使用VBA代码获取工作簿中所有工作表名称，并将其输出到Sheet1工作表的B列

Sub 获取工作表名称

Dim ws As Worksheet

Dim i As Integer

i = 1

For Each ws In ThisWorkbook.Worksheets

Sheets("Sheet1").Cells(i, 2).Value = ws.Name

Next ws

End Sub

温馨提示：答案为网友推荐，仅供参考

当前网址：https://verywind.cn/ee/xr7xefv3y2rv77rjjx.html