如何提取Excel工作簿名称且不带后缀名

很多用户在使用Excel的过程中，可能会遇到需要一键提取当前工作簿的名称（不带后缀名）的情况，那么该如何实现这个操作呢，下面就来教给大家方法。

步骤1：复制代码

首先，打开Excel之后，复制以下代码：

```

Function GetWorkbookName() As String

Dim wb As Workbook

Set wb ActiveWorkbook

GetWorkbookName Left(, InStr(1, , ".") - 1)

End Function

```

步骤2：进入VBA界面

按下组合键“Alt F11”进入VBA界面，并插入一个模块。

步骤3：粘贴代码

在模块中粘贴刚刚复制的代码。点击关闭按钮，关闭VBA窗口，回到Excel界面。

步骤4：插入控制开关

在Excel界面中，插入一个形状，作为控制代码的开关。

步骤5：指定宏

为形状指定宏，即刚刚复制粘贴的代码。

步骤6：提取工作簿名称

点击形状就会弹出窗口，显示该工作簿的名称（不带后缀名）。

通过以上简单的步骤，你可以轻松地提取Excel工作簿的名称，而且不带后缀名。这个方法对于需要频繁使用工作簿名称的用户来说非常实用。试试看吧！

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。