Home > 零敲碎打 > [VBS]Excel获取所有Sheet的名称

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

1.在当前Sheet里面获取当前Sheet名
选取任意单元格,编辑公式

1
=MID(CELL("filename",A1),FIND("]",CELL("filename",A1))+1,255)

2.在当前Sheet里面获取Workbook下所有的Sheet名
使用alt+f11组合快捷键进入vbe编辑器,插入一个新的模块,并在模块中输入以下代码:

1
2
3
4
5
Sub Maco1()
For i = 1 To Sheets.Count
Cells(i, 1) = Sheets(i).Name
Next
End Sub

然后运行指定宏既可以在当前sheet里面获取到了

Categories: 零敲碎打 Tags: ,
  1. No comments yet.
  1. No trackbacks yet.