VBA案例精选 获取Excel模板保存路径

代码运行结果：

代码截图：

代码文本：

Public Sub 获取Excel模板保存路径()

MsgBox "模板保存的默认路径是: " & Application.TemplatesPath

End Sub

注释：

在Excel中，我们可以用改其后缀形式.xlt等，保存为自定义模板，此时路径为用户路径。而我们的路径是系统本身的自带的模板路径，可以替换系统默认的模板。比如：改为护眼模式绿色为背景的Excel，可以通过路径找到这个文件夹把系统自带的删除换成所需要的，默认字体、默认样式等都可以设置好了替换。