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

1、本教程以新建Excel为例。

3、按下组合键进入VBA窗口。PS：如果对其他切换到VBA界面的方式感兴趣，可以参考以下链接：

5、在模块窗口，复制粘贴以下代码：Sub file()Dim k$ k = ActiveWorkbook.FullName MsgBox kEnd Sub

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