جستجوی یک عدد در یک سلول

[m.estreji]

سلام به همگی
من یه سلول دارم که توش پر شده از اعداد
مثلا اینجوری
11-45-136-212-89-8954-295
حالا یه فرمولی میخوام که بدونم آیا مثلا 8954 تو این سلول وجود داره یا نه
فرمول وی بی آ یا تابع
ممنون از همتون

[khakzad]

RE: جستجوی یک عدد در یک سلول

سلام
براحتی می تونید از فرمولfind استفاده کنید.ارگومان اول همونی هست که دنبالش می گردید.ارگومان بعدی هم سلولی که داخل اونو می خواید بگردید.
فقط ی نکته.این فرمول مکان مورد جستجو شده رو نشون میده.یعنی اگر پیداش کنه مقلا میگه سومین حرف هست.اما اگه پیدا نکنه ارور میده.که کاز اصلی شما اینجاست که با فرمول های رفع خطا به خواستتون برسید.به این شکلی که توضیح میدم خدمتتون:
از فرمول iferror استفاده کنید و بگید اگر نتیجه فرمول find خطا بود، بهتون بگه مورد مورد نظر یافت نشد.
همچنین از if هم می تونید استفاده کنید که درصورتی که جواب فرمول find چیزی مخالف عدد بود عبارت مورد نظر شما رو نشون بده
این مراحل رو اجرا کنید.قطعا به حواب میرسید
سوالی بود در خدمتم

[امين اسماعيلي]

RE: جستجوی یک عدد در یک سلول

با درود
میبخشی دیر جوابتون رو دادم . کلاس بودم و خسته. اما بریم سر موضوع شما.
یه کلید بزارین تو شیت1 و این کد های زیر که یکمم کجو کوله شدن رو توش بنویس
همون اعداد مثل خودتون رو هم بزارین تو رنج A1 . خودت گفتی توی یه سل بگرده یادت باشه ازم ایراد نگیری
اگه خواستی تو محدوده بیشتری بگرده A1 رو بکن A1:A10000 .
بعد از ران شدن کلید یه input boxمیاد اون عددی رو که میخوای برات تو رنج A1 پیدا کنه رو وارد کن. اگه باشه میگه هست. نباشه هم که میگه نیست.

[undefined=undefined]

Dim c As Range
Dim intValueToFind
("intValueToFind = InputBox("Please Enter the Your number

Set c = Sheet1.Range("A1").Find(What:="intValueToFind", LookIn:=xlValues, LookAt:=xlPart)
If Not c Is Nothing Then
"MsgBox "Your number not found
Else
MsgBox "yes! your number exist"
End If

[امين اسماعيلي]

RE: جستجوی یک عدد در یک سلول

با درود این دستوربالا شاید مشکل داشته باشه
یه نمونه فایل برات میزارم. شرمنده سایت مشکل داشت


http://uplod.ir/mmw2r18p6or9/find_match_cell.xlsm.htm