Project) (ReportTemplate.TemplatePath 属性

获取可视报表模板的路径和文件的名称。 只读 String

语法

expressionTemplatePath

表达 一个代表 ReportTemplate 对象的变量。

备注

视觉对象报告模板文件存储在每个用户的以下目录中,其中 LCID 是语言代码标识符,例如美国英语的 1033: C:\Users\[UserAlias]\AppData\Roaming\Microsoft\Templates\[LCID]\。 例如,adr1.xlt 是 Microsoft Excel 模板。

示例

以下示例为当前用户列出所有可视报表模板类型和文件。

Sub ListTemplatePaths() 

 Dim templateList As String 

 Dim typeOfTemplate As String 

 Dim template As ReportTemplate 

 

 For Each template In Application.VisualReportTemplateList 

 Select Case template.templateType 

 Case pjExcel 

 typeOfTemplate = "Excel" 

 Case pjVisioMetric 

 typeOfTemplate = "Visio Metric" 

 Case pjVisioUS 

 typeOfTemplate = "Visio U.S." 

 Case Else 

 End Select 

 

 templateList = templateList & vbCrLf & typeOfTemplate & ": " _ 

 & template.TemplatePath 

 Next template 

 

 MsgBox "Visual Reports Templates:" & templateList 

 

End Sub

另请参阅

ReportTemplate 对象

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。