Çözüldü Excel dosya yolunda Combobox nasıl kullanabiliriz ?

Workbooks("SY60-.xlsm").Worksheets("sheet1").Range("A2").AutoFilter Field:=4, Criterial:="*" + ComboBox2.Text + "*", _
Operator:=xlAnd
-------------------------------------------
yukarıdaki kodda workbooks combobox içeriğine göre bulmak istiyorum.
örnek alttaki gibi ama çalışmıyor
Workbooks(ComboBox1.Text & ".xlsx").Select.Worksheets("sheet1").Range("A2").AutoFilter Field:=4, Criterial:="*" + ComboBox2.Text + "*", _
Operator:=xlAnd

Çözümü buldum teşekkürler.
Set bkitap = Workbooks(ComboBox1.Text & ".xlsx")

bkitap.Worksheets("sayfa1").Range("A2").AutoFilter Field:=4, Criteria1:="*" + ComboBox2.Text + "*", _
Operator:=xlAnd