文字数:必ず指定します。置換文字列と置き換える文字列の文字数を指定します。文字列の一部と置き換える文字列を指定します。参考:https://support.microsoft.com/ja-jp/office/replace-%E9%96%A2%E6%95%B0-replaceb-%E9%96%A2%E6%95%B0-8d799074-2425-4a8a-84bc-82472868878a#:~:text=REPLACE%20%E9%96%A2%E6%95%B0%E3%81%AF%E3%80%81%E6%96%87%E5%AD%97%E5%88%97,%E3%81%AE%E6%96%87%E5%AD%97%E3%81%AB%E7%BD%AE%E3%81%8D%E6%8F%9B%E3%81%88%E3%81%BE%E3%81%99%E3%80%82REPLACE関数の引数の文字列に「CELL(“filename”)」を割り当て開始位置は1とします。REPLACE(CELL("filename"),1,次にFIND関数でブックのパスにある”]”を検索し、文字数を取得します。FIND("]",CELL("filename"))これによりシート名とパス情報の境目の文字の位置が取得できます。REPLACE関数の引数の文字数に境目の文字の位置を割り当て、最後の置換文字列を””にすることにより、パス部分の文字列を削除していきます。パス情報が削除され、シート名のみに絞られましたね。VBAで複数のシート名を一括取得する次にVBAで複数のシート名を一括取得する方法について説明をします。シートは3つあり、そのシート名すべてを取得し今見ているシートのA列へ出力していきます。VBAコードVBAは以下の通りです。'Sheetsコレクションから1シートづつオブジェクトを取得します。'シート名を取得し、表示シートのA列へ出力します。SubVBAの実装シートの指定範囲をCSV出力するVBAの実装方法についてはVBAの実装手順をご参照ください。VBAを実行シート一覧を表示させるシートを選択し、VBAを実行しましょう。はい、すべてのシート名がA列へ出力されていますね。VBAの説明VBAについて説明をします。Sheetsコレクションには指定したブックのシートオブジェクトすべてが含まれています。そこからオブジェクトを取得しNameプロパティからシート名を取得していきます。Sheetsコレクションから1シートづつオブジェクトを取得します。Sheetsシート名を取得し、表示シートのA列へ出力します。objSheetName.Nameタカヒロさらにハイパーリンク付きでシート名を取得することができます。よろしければ以下の記事もご参考ください。実装手順は以下の通りです。Excel側にVBAを実装していきます。1Excelを新規に開き、「開発」タブをクリックし、「VisualBasic」をクリックします。ショートカットキー「Alt」+「F11」でもOKです。2標準モジュールを追加します。モジュール」を選択します。3右ペインのウインドウに上記のVBAを入力します。VBAを実行するでは早速VBAの実行をしてみましょう。1「開発」タブの「VBA」をクリックし実行したいマクロを選択し、「実行」をクリックします。2処理がされたことが確認できれば完了です。さいごにいかがでしょうか。・VBAでExcelにあるシート名を一括で取得する方法についてまとめました。他にも便利な方法がありますので、よろしければご参照頂ければと思います。この記事の関連キーワードこちらの記事の関連キーワード一覧です。クリックするとキーワードに関連する記事一覧が閲覧できます。シート「シート」の関連記事こちらの記事の内容「シート」に関連する記事一覧です。コメントをキャンセルメールアドレスが公開されることはありません。*サイト次回のコメントで使用するためブラウザーに自分の名前、メールアドレス、サイトを保存する。関数シートExcelのIF関数で数字の値が入っていたら計算する方法!Excelのシートを一括で再表示させる方法!VBAで別ブックも対応可!RECOMMENDこちらの記事も人気です。