エクセルでシート名検索

質問

会社でエクセル2002を使用しています。

(1)シート名の検索ってできるんでしょうか？？

(2)あと複数のファイルで一度にシート名の検索はできないですか？

回答No.1

imogasi

Sheet1など名前が目立つシートに、コマンドボタンを１つ貼りつけ、ダブルクリックする。
ＶＢＥ画面になり
Private Sub CommandButton2_Click()
End Sub
が出るから
Private Sub CommandButton2_Click()
shn = InputBox("検索シート名＝")
Dim sh As Worksheet
　For Each sh In ActiveWorkbook.Worksheets
　　If shn = sh.Name Then
　　　sh.Select
　　End If
　Next
End Sub
とコピペする。
シートＳｈｅｅｔ１のボタンをクリックすると
検索したいシート名を聞いてくるから、入力すると
そのシートを選択し、シート目タブが白くなる。
Sheet2などのsは大文字で指定のこと。

お礼

ありがとうございました。
参考にさせていただきます。