جستجو همراه با space

[ali.b]

سلام وقت دوستان بخیر
من با کد زیر باکمک یک کمبوباکس شیتمورد نظرم رو فیلتر میکنم اما مشکلی که هست اینه اگه کلمه ای قبل یا بعدش space باشه رو نشون نمیده در حالی که source کمبوباکس ازستون همین کلمات هست یعنی باname manager کمبوباکس تزریقمیشه

ممنونم راهنمایی کنید

ActiveSheet.Range("$B$1").AutoFilter Field:=2, Criteria1:="*" & com1.Value & "*"