Excelから一部が一致するデータを抽出するには？ (ID:104657)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 現在Excelからデータを検索するプログラムを作っています。 現在 rs.Openで指定したシートのデータをrsに入れ、 rs.Filter = "入力 Like '"&Text1.text&"*' " として、入力の中に"おはよう"という項目がある時、Text1.Textの内容が "おはよ"でもデータを抽出できるのですが、Text1.Textの内容が"おはようござ"ではデータを抽出できません。 Text1.Textの中に含まれる単語を探しだしたいのですが（Text1と入力の関係を逆）、rs.Filterとは別の方法でも構わないので、よろしくお願いします。