Excel获取工作表名称的两种方法-Excel教程

本经验介绍使用Excel内置的VBA工具来获取工作表名称的两种方法，具体步骤如下所述：

前期准备工作（包括相关工具或所使用的原料等）

Excel 2003

方法1：vba自定义函数获取工作表名称

打开Excel工作簿文档，按ALT+F11组合键进入VBA编辑器窗口

单击“插入”菜单中的“模块”命令

复制下面的代码，粘贴到模块框中

Function gname(x As Integer)
If x=0 Then
gname=ActiveSheet.Name

ElseIf x > 0 And x <=Sheets.Count Then
gname=Sheets(x).Name
ElseIf x > Sheets.Count Then
MsgBox "超出范围"
If
Application.Volatile
Function

然后关闭VBA编辑器，返回到Excel工作表界面，在A1单元格键入公式“=gname(ROW(A1))”，向下拖动复制，直到出现0错误为止。

方法2：vba获取工作表名称

打开Excel工作簿文档，按下ALT+F11组合键，打开VBA编辑器窗口

单击菜单栏上的“插入”——“模块”

将下面的代码拷贝到模块文本框中

Sub vba获取工作表名称()
For x=1 To Sheets.Count
Cells(x, 1)=Sheets(x).Name
Next x
Sub

按F5键或单击工具栏的“运行”按钮即可实现用vba获取工作表名称的效果

关闭VBA编辑器窗口，返回Excel工作表界面，在A列我们就可以看到获取到的工作表名称

经验内容仅供参考，如果您需解决具体问题(尤其法律、医学等领域)，建议您详细咨询相关领域专业人士。作者声明：本文系本人依照真实经历原创，未经许可，谢绝转载。