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

发布时间:2017-06-15 18:40

使用Excel内置的VBA工具来获取工作表名称是怎么进行的呢?具体该怎么就去操作?今天,小编就教大家在Excel中进行获取工作表名称的操作技巧。

Excel中进行获取工作表名称的操作方法一

vba自定义函数获取工作表名称

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

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

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

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

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

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

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

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

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

Excel中进行获取工作表名称的操作方法二

vba获取工作表名称

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

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

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

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

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

Sub vba获取工作表名称()

For x = 1 To Sheets.Count

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

Next x

End Sub

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

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

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

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

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

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