メインコンテンツへスキップ

Excelで特定の名前のワークシートを数える方法は？

名前が特定の単語で始まる、または特定の単語を含むワークシートの数を数えようとしたことがありますか？ たとえば、名前が「KTE」で始まる、または「KTE」を含むワークシートの数を数えます。 この記事では、問題を示すのに役立つ方法を提供します。

VBAコードで特定の名前のワークシートを数える
シート名に特定の単語が含まれているすべてのワークシートをすばやく見つける

VBAコードで特定の名前のワークシートを数える

次のVBAコードは、ワークブック内の特定の名前のワークシートの数を数えるのに役立ちます。 次のようにしてください。

1。 プレス 他の + F11 キーを押して アプリケーション向け Microsoft Visual Basic 窓。

2。 の中に アプリケーション向け Microsoft Visual Basic ウィンドウ、クリック インセット > モジュール、次に、以下のVBAコードを[コード]ウィンドウにコピーします。

VBAコード1：名前が「KTE」で始まるワークシートをカウントします

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If Mid(Sheets(I).Name, 1, 3) = "KTE" Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that start with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

「KTE」を含むワークシートの数をカウントしたい場合は、以下の VBA コード 2 を適用してください。

VBA コード 2: 名前に「KTE」が含まれるワークシートを数える

Sub CountWSNames()
    Dim I As Long
    Dim xCount As Integer
    For I = 1 To ActiveWorkbook.Sheets.Count
        If InStr(1, Sheets(I).Name, "KTE") > 0 Then xCount = xCount + 1
    Next
    MsgBox "There are " & CStr(xCount) & " sheets that with 'KTE'", vbOKOnly, "KuTools for Excel"
End Sub

Note: 「KTE」という単語を、ワークシートの数をカウントするのに必要な単語に置き換えてください。

3。 プレス F5 キーを押してコードを実行します。 次に、ダイアログ ボックスがポップアップ表示され、現在のワークブック内に「KTE」で始まるワークシート、または「KTE」を含むワークシートが何枚あるかが表示されます。 スクリーンショットを参照してください:

名前が「KTE」で始まるワークシートの数:

名前に「KTE」を含むワークシートの数:

シート名に特定の単語が含まれているすべてのワークシートをすばやく見つける.

このセクションでは、Kutools for Excelを使用して、シート名に特定の単語を含むすべてのワークシートをすばやく検索する方法を示します。

Kutools for Excel ：300以上の便利なExcelアドインで、 30日以内に制限なしで無料でお試しいただけます.

1. Kutools for Excelをインストールした後、Kutoolsの ナビゲーション ワークブックの左側にペインが自動的に開きます。 または、 をクリックしてペインを有効にすることもできます。 クツール > ナビゲーション 以下のスクリーンショットのように。

2。 の中に ワークブックとシート ナビゲーション ペインのセクションで、 フィルタ ボックスに、ワークシートを検索するときに使用する特定のワークシート名を入力します。 次に、名前に特定の単語が含まれるすべてのワークシートがフィルタリングされ、ワー​​クシート リスト ボックスにリストされます。 スクリーンショットを参照してください:

  このユーティリティの無料トライアル（30日）が必要な場合は、 クリックしてダウンロードしてください、次に、上記の手順に従って操作を適用します。

関連記事：

最高のオフィス生産性向上ツール

🤖 Kutools AI アシスタント: 以下に基づいてデータ分析に革命をもたらします。 インテリジェントな実行   |  コードを生成  |  カスタム数式の作成  |  データを分析してグラフを生成する  |  Kutools関数を呼び出す...
人気の機能: 重複を検索、強調表示、または識別する   |  空白行を削除する   |  データを失わずに列またはセルを結合する   |   数式なしのラウンド ...
スーパールックアップ: 複数の基準の VLookup  |   複数の値の VLookup  |   複数のシートにわたる VLookup   |   ファジールックアップ ....
詳細ドロップダウン リスト: ドロップダウンリストを素早く作成する   |  依存関係のドロップダウン リスト   |  複数選択のドロップダウンリスト ....
列マネージャー: 特定の数の列を追加する  |  列の移動  |  Toggle 非表示列の表示ステータス  |  範囲と列の比較 ...
注目の機能: グリッドフォーカス   |  デザインビュー   |   ビッグフォーミュラバー   |  ワークブックとシートマネージャー   |  リソースライブラリ (自動テキスト)   |  日付ピッカー   |  ワークシートを組み合わせる   |  セルの暗号化/復号化   |  リストごとにメールを送信する   |  スーパーフィルター   |   特殊フィルター (太字/斜体/取り消し線をフィルター...) ...
上位 15 のツールセット:  12 テキスト ツール (テキストを追加, 文字を削除する、...）   |   50+ チャート 種類 (ガントチャート、...）   |   40+ 実用的 式 (誕生日に基づいて年齢を計算する、...）   |   19 挿入 ツール (QRコードを挿入, パスから画像を挿入、...）   |   12 変換 ツール (数字から言葉へ, 通貨の換算、...）   |   7 マージ＆スプリット ツール (高度な結合行, 分割セル、...）   |   ... もっと

Kutools for Excel で Excel スキルを強化し、これまでにない効率を体験してください。 Kutools for Excelは、生産性を向上させ、時間を節約するための300以上の高度な機能を提供します。  最も必要な機能を入手するにはここをクリックしてください...

説明

Officeタブは、タブ付きのインターフェイスをOfficeにもたらし、作​​業をはるかに簡単にします

  • Word、Excel、PowerPointでタブ付きの編集と読み取りを有効にする、パブリッシャー、アクセス、Visioおよびプロジェクト。
  • 新しいウィンドウではなく、同じウィンドウの新しいタブで複数のドキュメントを開いて作成します。
  • 生産性を 50% 向上させ、毎日何百回もマウス クリックを減らすことができます!
Comments (0)
No ratings yet. Be the first to rate!
There are no comments posted here yet
Please leave your comments in English
Guest
Posting as Guest
×
Rate this post:
Reset
0   Characters
Suggested Locations