シートがブックに存在するかどうかを確認するにはどうすればよいですか？

ワークブックに数十または数百のワークシートがあり、このワークブックにシートが存在するかどうかを検索または確認する場合、一般に、それは大きな作業になる可能性があります。 ここで、VBAコードと、ブックにシートが存在するかどうかをすばやく確認するための便利なツールを紹介します。

VBAを使用してブックにシートが存在するかどうかを確認します

シートが存在するかどうかを確認し、Kutools forExcelでシートに切り替えます

シートがブックに存在するかどうかを確認します

以下の手順に従ってVBAコードをコピーして実行し、現在のブックにシートが存在するかどうかを確認してください。

1。 押す Altキー+ F11 を表示する アプリケーション向け Microsoft Visual Basic 窓。

2.ウィンドウで、をクリックします インセット > モジュール 新しいモジュールウィンドウを表示するには、次のVBAコードをモジュールウィンドウにコピーします。

VBA：ブックにシートが存在するかどうかを確認します。

Function CheckSheet(pName As String) As Boolean
'Updateby20140617
Dim IsExist As Boolean
IsExist = False
For i = 1 To Application.ActiveWorkbook.Sheets.Count
    If Application.ActiveWorkbook.Sheets(i).Name = pName Then
        IsExist = True
        Exit For
    End If
Next
CheckSheet = IsExist
End Function

3.このコードを保存し、シートに戻って空白のセルを選択し、この数式を入力します = CheckSheet（“ Shee1”） （Sheet1は、存在するかどうかを確認するシート名を示します）を押して、 入力します ボタン、 間違った情報 このシートが存在しないことを示し、 ツア 現在のブックに存在することを示します。

シートが存在するかどうかを確認し、Kutools for ExcelwithVBAでシートに切り替えます

上記の定義済み関数を使用すると、シートが存在するかどうかを確認できますが、これも少し難しいです。 しかし、 Kutools for Excel、ナビゲーションペインには、すべてのシート名が一覧表示されます。これにより、スクロールしてシートを検索したり、シート名をフィルタリングしてシートを検索したりできます。必要に応じて、シート名をクリックすると、検索後にシートにすばやく切り替えることができます。

後 無料インストール Kutools for Excel、以下のようにしてください：

1.シート名が存在する場合は確認するブックを有効にして、[]をクリックします。 クツール > ナビゲーション。 スクリーンショットを見る
:

2.次に、ポップペインで、をクリックします ワークブックとシート ボタンをクリックしてペインを展開すると、ペインにすべてのシート名のリストが表示され、スクロールしてシート名を見つけることができます。

3.または確認できます フィルタ ボタンをクリックし、確認したいシート名のキーワードを入力すると、指定したシート名が一覧表示され、シート名をクリックすると、シートが表示されます。