Excelのワークシート名を一度に参照する関数はありません。
=CELL("filename")
で、ブック名を含んだシート名を求めることができますが、それぞれのシート上に求めたものを再集計しなければなりません。
ワークシート名一覧があるとできること
ワークシート名一覧があると、全シートのある範囲からある範囲までをINDIRECT関数で1シートにまとめることができます。
一つにまとめられれば集計も楽になります。
この式は30行ごとにシートそれぞれを1シートにまとめることができる数式です。
=INDIRECT(シート名&"A"&MOD((ROW()-1),30)+1)
ワークシート名一覧を作成するVBA
ワークシート名一覧を作成するVBAは次の通りです。
Sub シート名一覧()
Dim i As Integer
For i = 1 To Worksheets.Count
Range(“A” & i).Value = Worksheets(i).Name
Next
End Sub
コメント
[…] ということで、それを実現するVBAを考えました。 この記事のVBAの応用です。 […]
[…] ということで、それを実現するVBAを考えました。 この記事のVBAの応用です。 […]