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

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

November 9th, 2018 Leave a comment Go to comments

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里面获取到了

Categories: 零敲碎打 Tags: ,
  1. No comments yet.
  1. No trackbacks yet.
You must be logged in to post a comment.