我想问用VBA打开PPT模板(POTX)的时候，用VBA获得这个模板的文件路径。

Hi,


以下代码通过调用 PPT 的打开文件对话框并结合筛选器 *.potx 可以成功获取模板路径：
Public Sub GetTemplatePath()
    Dim fd As FileDialog

    Set fd = Application.FileDialog(msoFileDialogFilePicker)

    With fd
        With .Filters
            .Clear
            .Add "PowerPoint Template", "*.potx"
        End With

        If .Show = -1 Then
            MsgBox .SelectedItems(1)
        End If
    End With

    Set fd = Nothing
End Sub

运行效果：