VBAでシート名をワイルドカード指定する

対象：Excel 2010, Excel 2013, Windows版Excel 2016

「マクロシート名指定一部」
「vba シート名指定の文字列を含む条件文」
といった検索キーワードでアクセスがありました。

名前に指定した文字列が含まれるシートを指定したい、ワイルドカードを使ってシート名を指定したい、という要望です。

「特定のシート名繰り返すマクロ」
という検索キーワードも同様でしょう。

［スポンサードリンク］

シート名をワイルドカード指定するサンプルマクロ

以下のSubプロシージャを実行すると、シート名に「マスター」という文字列の含まれるシートが、順番に選択され、そのシート名がメッセージボックスに表示されます。

Sub シート名をワイルドカード指定するサンプル()
　Const FIND_STR = "マスター"

　Dim sh As Object
　For Each sh In Sheets
　　If sh.Name Like "*" & FIND_STR & "*" Then
　　　sh.Select
　　　MsgBox sh.Name
　　End If
　Next sh
End Sub

すべてのシートに対して、For Each～Nextループを回して、
　　Dim sh As Object
　　For Each sh In Sheets

シートの名前が、定数FIND_STRに指定された文字列を含んでいるかを、ワイルドカード「*」とLike演算子を使って調べています。
　　　If sh.Name Like "*" & FIND_STR & "*" Then

上記のSubプロシージャでは、全てのシートにループ処理を行っていますが、ワイルドカード指定で見つかった最初のシートにだけ処理をしたいのなら、
　　　End If
の前に、「Exit Sub」などを入れてループを抜けてください。

最終更新日時：2019-01-12 05:41

［スポンサードリンク］

『インストラクターのネタ帳』では、2003年10月からMicrosoft Officeの使い方などを紹介し続けています。
日経BP社から出版された、Excel VBAユーザー向けのPython超入門書です↓↓

上記の『Excel VBAユーザーのためのPythonプログラミング』の、元になったキンドル本です↓↓

『インストラクターのネタ帳』を運営する伊藤潔人が、初めて書かせていただいた書籍です↓↓

PowerPoint VBA本は、実はオブジェクトブラウザーの使い方を徹底的に解説した本です↓↓

数式を使った条件付き書式設定が苦手な方に向けたKindle本を書きました↓↓

小数とPythonのdecimalモジュールの基本をキンドル本としてまとめました↓↓

Pythonの文字列フォーマットの基本をキンドル本としてまとめました↓↓

Excel VBAの経験がある方を対象に、Word VBAの基本をキンドル本としてまとめました↓↓

Excel VBAユーザーの方を対象として、Wordの表をVBAで操作する基礎をまとめました↓↓

図形を操作するExcel VBAの基本を解説したキンドル本を出しました↓↓

グラフを操作するExcel VBAの基本を解説したキンドル本です↓↓

Pythonの外部ライブラリOpenPyXL（オープンパイエクセル）の入門書を、Excel VBAユーザーに向けに書きました↓↓

「Sheets・Worksheet」の記事一覧