Excel VBA 質問スレ Part61

[20 デフォルトの名無しさん (ﾜｯﾁｮｲ 6df9-PuIg) 2019/04/27(土) 13:09:43.12 ID:V/rwcmys0]

ActiveSheet.Cells(1, 1) = "シート名一覧"
Dim iIndex As Integer

For iIndex = 1 To Worksheets.Count
ActiveSheet.Cells(iIndex + 1, 1) = Worksheets(iIndex).Name
Next iIndex

全く何がしたいのかわからない