【Excel VBA】ブック内のシートの数とシート名を一括取得する方法

知らず知らずのうちにシートが増えて件数を確認したい場合があるかと思います。

そんな時は以下のコードで数えることができます。

Sub CountSheets()
    MsgBox Worksheets.Count
End Sub

実行すると件数が入ったメッセージボックスが表示されます。

シートの表示名を確認したい場合

シートの表示名を確認したい場合は以下の以下のコードを実行してください。

Sub SheetNames()
    Dim temp As Object
    Dim SheetName As String
    For Each temp In ThisWorkbook.Sheets
        SheetName = SheetName & vbNewLine & temp.Name
    Next temp
    MsgBox SheetName
End Sub

画像のように一覧表示ができます。



この記事の関連キーワード

こちらの記事の関連キーワード一覧です。クリックするとキーワードに関連する記事一覧が閲覧できます。




タカヒロ

プログラミングやマーケティングなどに興味あるけど
どのスクールが良いか悩むときはないですか?

タカヒロもスクール選びにとても苦労しました…

そんな時には数ある中から第三者目線でいまの貴方に合ったスクールを提案してくれるスクマドのカウンセリングサービスがおすすめです。

メリットだけでなくディメリットもズバリと伝えてくれます!

これでお悩み時間を短縮できますね!詳細は☟になります。

※完全無料です。ご安心ください。





コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です