• ベストアンサー
※ ChatGPTを利用し、要約された質問です(原文:Excel VBA 全sheet名の取得)

Excel VBA 全sheet名の取得

このQ&Aのポイント
  • Excel VBAを使用して、1つのブックに存在する全てのシート名を一括で取得する方法について詳しく解説します。
  • 処理の条件として、まとめ用のシートが既に作成されていることや、複数のシートが存在することを考慮しています。
  • また、セルA1、A2、A3...という形式でシート名をまとめ用のシートに表示させる処理を行います。

質問者が選んだベストアンサー

  • ベストアンサー
  • kakusuke
  • ベストアンサー率36% (95/259)
回答No.1

Sub 全sheet名_取得() Dim ws As Worksheet Dim str As String i = 1 For Each ws In ActiveWorkbook.Sheets str = ws.Name Worksheets("まとめ").Range("A" & i) = str i = i + 1 Next End Sub

u-mesh12
質問者

お礼

早速の回答ありがとうございました。

関連するQ&A

専門家に質問してみよう