excel中vba函数获取工作表名称的操作方法

办公教程导读

收集整理了【excel中vba函数获取工作表名称的操作方法】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含674字，纯文字阅读大概需要1分钟。

办公教程内容图文

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

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

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

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

　　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 "超出范围"

　　End If

　　Application.Volatile

　　End Function

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

　　Excel中vba函数获取工作表名称的方法2：vba获取工作表名称。

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

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

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

　　Sub vba获取工作表名称()

　　For x = 1 To Sheets.Count

　　Cells(x, 1) = Sheets(x).Name

　　Next x

　　End Sub

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

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