如何使用VBA列出字符串中工作簿中的所有工作表？

Question

如何使用VBA获取活动工作簿中所有工作表的名称(或者最多三个)作为字符串返回？对于上下文,我将在保存时使用字符串命名工作簿.我已经想出如何使用输入对话框等为文件创建savename,所以这只是让VBA返回类似"[Worksheet 1 name]和[Worksheet 2 name]"之类的东西.

非常感谢!

Answer 1

Option Explicit

Sub namesheets()

Dim wks as Worksheet, strName as String

For each wks in Worksheets
     strName = strName & wks.Name
Next

End Sub

您还可以谷歌"Excel vba循环工作簿中的工作表"或类似的东西,并很容易找到答案.

此外,这个问题在本网站上以某种形式提出.请参阅链接... 循环浏览工作表的子集