エクセルで目次自動生成

エクセルで各シートの特定のセルに入力したものをトップのシートに目次として自動に生成する方法はありますでしょうか？

No.1 回答者： capy2009 回答日時： 2009/11/27 11:09

関数では無理じゃないでしょうか。

手動でコピペするか、自動でやるならマクロを組む必要があります。Mac の場合、Excel 2008 にはマクロ機能がないので、2004 以前が必要です。

例えば下記のようなマクロを使えば、2枚目以降のワークシートの A2 セルの値をまとめて、1枚目のシートにリストアップできます。

Sub SheetIndex()

Dim myColumn As Integer
Dim myRow As Integer
Dim i As Integer

myColumn = 1 ' 集計するセル位置の列番号
myRow = 2 ' 集計するセル位置の行番号

For i = 2 To Sheets.Count
Sheets(1).Cells(i, 1).Value = Sheets(i).Columns(myColumn).Rows(myRow)
Next i

End Sub