ブック全体の文字列検索について
Excelでセルに任意の文字列をペーストします。そのセルは別のブックにリンクしているのでペーストする度にリンク先のセルでは文字列が更新されます。リンク先のブックにはワークシートが10あっていづれかのシートのA列にその文字列がある事になっています。更新された文字列を検索する作業を繰り返すのでマクロで組み込もうと思ったのですがFIND関数にしても、VBでCell.Find(What:=....と書くにも参照する文字列を直接指定してやらないと動きません。参照する文字列が相対的に変化するので「特定のセルの中に入力された文字列」を参照してブック内を検索したいということなのですが、実現するにはどうしたらようでしょうか?と質問して
moji = "B1"
Set c = Range("A:A").Find(What:=moji, LookIn:=xlValues, LookAt:=xlWhole)
If Not c Is Nothing Then c.Select
というコードをしめしていただきました。このままだと検索対象がRangeオブジェクトになっているのでActivesheet上でしか検索がかからないのでCellsにすればブック内のすべてのシートに検索がかけられるかな?と思っていたのですがエラーがでます。ブック内を検索範囲に入れるためにはどうしたらよいでしょうか?
お礼
tom11さん、回答ありがとうございます。 なるほど、ctrl+k, ctrl+shift+kで次の検索対象に移動できますね。 また、最後の検索に到達した場合も最初に戻ってくれますね。 検索ダイアログを表示した状態で次のキー操作を行っていたので、おかげさまでだいぶ楽になりました^^; (1)"alt+n"で次を検索 (2)"alt+b"でBackwordに設定して、"alt+n"で次を検索 (3)"alt+p"でWrap searchをonにして、"alt+n"で次を検索