キーワードで検索VBAでワイルドカードを使用する

Question

これはCTRL-Fで行うことができますが、VBAで実行できるようにしたいと思います。たとえば、ワークブック内の「Worthington Pump」を検索したいが、ワークブック内のどこにあるかは、同じ順番になっているが、同じセルにあるので、「Worthington Pump」を検索することができます。 CTRL-FではなくVBAを使ってこれを行う方法はありますか？

Answer 1

rngが検索したい範囲であるとします。

For Each c In rng 
    If InStr(c.Value, "Worthington") > 0 And InStr(c.Value, "Pump") > 0 Then 
     'some code to highlight cell 
    End If 
Next c 

は、そのコードがあなたのためにトリックを行うだろうと思う:)

Answer 2

InString検索は学ぶことが素晴らしい、そして重要ですが、別のオプションは、私は非常にあなたが得る励ますRange.Findメソッドを使用することですに精通。 Range.Find Method (Excel)

ワイルドカード文字はアスタリスク（*）であり、あなたが選んだ文字列の前、中、または後に置くことができます。下の私の例では、テキストが "Worthington"または "Pump" ANYWHEREにある最初のセルを見つけて選択します。

非常に便利な学習方法です。

Range("A1:A10").Find(What:="*Worthington*").Select 
'Do Stuff' 

ORの

Range("A1:A10").Find(What:="*Pump*").Select 
'Do Stuff'