>>526
えっと。
LIKEのような動きにしたいのなら
StrSql = StrSql & "社員名称 LIKE '*" & syainMei & "*' "
のようにしないとだめですね。
ワイルドカードはわかりますよね?