Excel中进行获取工作表名称的操作技巧

Question

如题所述

Answer 1

　　使用Excel内置的VBA工具来获取工作表名称是怎么进行的呢?具体该怎么就去操作?今天，小编就教大家在Excel中进行获取工作表名称的操作技巧。
　　Excel中进行获取工作表名称的操作方法一
　　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 "超出范围"
　　End If
　　Application.Volatile
　　End Function
　　然后关闭VBA编辑器，返回到Excel工作表界面，在A1单元格键入公式“=gname(ROW(A1))”，向下拖动复制，直到出现0错误为止。
　　Excel中进行获取工作表名称的操作方法二
　　vba获取工作表名称
　　打开Excel工作簿文档，按下ALT+F11组合键，打开VBA编辑器窗口。
　　单击菜单栏上的“插入”——“模块”。
　　将下面的代码拷贝到模块文本框中。
　　Sub vba获取工作表名称()
　　For x = 1 To Sheets.Count
　　Cells(x, 1) = Sheets(x).Name
　　Next x
　　End Sub
　　按F5键或单击工具栏的“运行”按钮即可实现用vba获取工作表名称的效果。
　　关闭VBA编辑器窗口，返回Excel工作表界面，在A列我们就可以看到获取到的工作表名称。