基于VBA技术实现一键提取工簿的名称（不带后缀名），如果你溏胃釜阼对这方面感兴趣的话，可以尝试学习一下。
工具/原料
Excel
本教程以Excel2013为例
方法/步骤
1、本教程以新建的Excel文觇致惯鸹档为例（PS：打开任意的Excel文档都可以），为了便于学者更好的理解，最后会加一条弹窗命令显示得到的工作簿名称。
2、打开Excel之后，按下组合键Alt+F11进入VBA界面。
3、插入一个模块。
4、在模块中复制粘贴以下代码：Subfile()Dimk$,i%,n$,m$巳呀屋饔,s$k=ActiveWorkbook.Names="."Doi=足毂忍珩i+1n=Mid(k,i,1)LoopUntiln=sm=Mid(k,1,i-1)MsgBoxmEndSub
5、关闭VBA回到Excel界面。
6、插入一个形状，作为控制代码的开关。
7、为形状指定宏，即刚刚复制粘贴的代码。
8、点击形状，即会弹出窗口显示该工作簿的名称。
