XSLTransform 对象 (Word)
代表一个已注册的可扩展样式表语言转换 (XSLT)。
使用 XSLTransforms 集合的 Add 方法添加到列表中的可用架构的 Xslt 个别的 XSLT。 下面的示例将 simplesample.xslt 转换添加到 SimpleSample 架构的 Xslt。
Sub AddXSLT()
Dim objSchema As XMLNamespace
Dim objTransform As XSLTransform
Set objSchema = Application.XMLNamespaces("SimpleSample")
Set objTransform = objSchema.XSLTransforms _
.Add("c:\schemas\simplesample.xslt")
End Sub
使用 XSLTransforms 集合的 Item 方法可以返回一个 请参见 对象。 下面的示例删除第一个 XSLT 中的 Xslt 的 SimpleSample 架构集合。
Sub DeleteTransform()
Dim objXSLT As XSLTransform
Dim intResponse As Integer
Set objXSLT = Application.XMLNamespaces("SimpleSample") _
.XSLTransforms.Item(1)
intResponse = MsgBox("Are you sure you want to delete the " _
& objXSLT.Alias & " XSLT?", vbYesNo)
If intResponse = vbYes Then objXSLT.Delete
End Sub
备注
[!注释] SimpleSample 架构包含在 Smart Document Software Development Kit (SDK) 中。 有关详细信息,请参阅 Microsoft Developer Network (MSDN) 网站上的 Smart Document SDK。
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。