[VBS]Excel获取所有Sheet的名称

1.在当前Sheet里面获取当前Sheet名 选取任意单元格,编辑公式 =MID(CELL(“filename”,A1),FIND(“]”,CELL(“filename”,A1))+1,255) 2.在当前Sheet里面获取Workbook下所有的Sheet名 使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码: Sub Maco1() For i = 1 To Sheets.Count Cells(i, 1) = Sheets(i).Name Next End Sub 然后运行指定宏既可以在当前sheet里面获取到了