获取从模板

时间:2016-03-01 13:29:23

标签: vba templates path ms-word word-vba

我有一个带有宏的单词模板(* .dotm)。我需要知道模板存储在从模板创建的Word文档中的路径。

使用Application.ActiveDocument.FullName仅当我在编辑模式下直接打开模板时,才会获得模板的(完整)路径。从文档ActiveDocument创建文档时指向新创建的文档,因此它不会提供我想要的路径。

在文档被实例化之后,

Private Sub Document_New()似乎被解雇了,所以这是为了获取模板路径值,并且似乎没有我可以使用的事件更早发生。

还尝试了ActiveDocument.AttachedTemplate,但它只返回一个带有文件名而不是完整路径的字符串。

如何在实例化文档中获取模板的完整路径?

请注意模板存储在网络服务器(SharePoint)上,因此ActiveDocument.AttachedTemplate.Path当前返回临时互联网文件中的路径

1 个答案:

答案 0 :(得分:-1)

试试这个

 Sub FindingTemplateFullPath()

      Dim TemplatePath As String
      Dim TemplateName As String
      Dim TemplateFullPath As String

      TemplatePath = ActiveDocument.AttachedTemplate.Path
      TemplateName = ActiveDocument.AttachedTemplate.Name

      TemplateFullPath = TemplatePath & Application.PathSeparator & TemplateName

 End Sub