فیلتر بر اساس آیتم خاص

[telesate]

با سلام خدمت دوستان در مثال زیر اگه بخواهیم فیلتری که بر حسب نام میباشد بر حسب شماره شناسنامه انجام دهیم چه کدی را باید در فرم تغییر بدهیم ممنون میشوم اگه منو راهنمایی بفرمایید

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[ali.b]

If TextBox1 <> "" Then            ActiveSheet.Range("b2").AutoFilter _
            field:=1, _
            Criteria1:="*" & TextBox1 & "*"


        End If
    End With

عین همین شرط رو برای رنجی که شماره شماسنامه هست بنویس