Excel一键提取工作簿所在路径+文件名+扩展名

1、本教程以新建Excel为例。Excel保存含宏指令（或VBA代码）工作簿技巧

4、进入VBA窗口后，插入一个模块。

5、在模块窗口，复制粘贴以下代码：

Sub file()

Dim k$

    k = ActiveWorkbook.FullName

    MsgBox k

End Sub

6、返回Excel界面，插入一个形状，将其指定步骤5中的代码。

7、点击该形状，即可提取该工作簿的路径+文件名+扩展名（后缀名）。