پرسش فیلتر کردن یک ستون با داده های متغییر از نظر نوع داده ای

[tarokh]

سلام دوستان
من یه ستون از داده ها عددی و رشته دارم که با فیلتر کردن خود اکسل به طور مثال هر سطری که عدد 75 درش بکار رفته رو بخوام فیلتر کنم مشکلی نیست (تصویر زیر)


ولی وقتی توی VBA همینو فیلتر میکنم فقط سطر هایی که داده آنها بصورت رشته (string) هست رو فیلتر میکنه
ActiveSheet.Range("$A$1:$b$5000").AutoFilter Field:=1, Criteria1:="*" & id_taminkonandeh & "*", Operator:=xlAnd]

لطفاً کمکم کنید .

[M_ExceL]

سلام دوستان
من یه ستون از داده ها عددی و رشته دارم که با فیلتر کردن خود اکسل به طور مثال هر سطری که عدد 75 درش بکار رفته رو بخوام فیلتر کنم مشکلی نیست (تصویر زیر)
[ATTACH=CONFIG]18974[/ATTACH]

ولی وقتی توی VBA همینو فیلتر میکنم فقط سطر هایی که داده آنها بصورت رشته (string) هست رو فیلتر میکنه
ActiveSheet.Range("$A$1:$b$5000").AutoFilter Field:=1, Criteria1:="*" & id_taminkonandeh & "*", Operator:=xlAnd]

لطفاً کمکم کنید .

سلام،
علت این امر وجود مقادیری بصورت اعداد، داخل رنج مورد نظر می باشد
لذا به یکی از روش های زیر ستون مورد نظر رو تبدیل به text کنید
روش اول ) - استفاده از ابزار Text to Columns
ستون مورد نظر رو انتخاب کرده سپس ابزار Text to Columns رو انتخاب کنید
با کلیک بروی next به مرحله سوم می رسید، در این مرحله دکمه رادیویی text رو انتخاب کنید



روش دوم ) - استفاده از vba
ستون مورد نظر رو انتخاب کرده سپس ماژول زیر رو اجرا کنید :

Sub crt()
Selection.TextToColumns DataType:=xlDelimited, FieldInfo:=Array(1, 2)
End Sub 

یا حق.