Word VBA教程:Templates属性

该属性返回一个Templates集合,该集合代表所有可用的模板,包括共用模板和附加到打开文档的模板。

expression.Templates

expression   必需。该表达式返回一个Application对象。

说明

有关返回集合中单独成员的内容,请参阅返回集合中的对象

VBA示例

本示例显示 Templates集合中每个模板的名称。


Count = 1
For Each aTemplate In Templates
    MsgBox aTemplate.Name & " is template number " & Count
    Count = Count + 1
Next aTemplate

本示例中,如果模板 1 是一个共用模板,则其路径存储在thePath 变量中。用 ChDir 语句可将存储在thePath 变量中的路径设为当前文件夹路径。进行更改后,将显示“打开”对话框。


If Templates(1).Type = wdGlobalTemplate Then
    thePath = Templates(1).Path
    If thePath <> "" Then ChDir thePath
    Dialogs(wdDialogFileOpen).Show
End If

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号