Clase XSLTransforms (Word VBA)

Para usar una variable de clase XSLTransforms, primero debe ser instanciado, por ejemplo

Dim xsls as XSLTransforms
Set xsls = Application.XMLNamespaces(1).XSLTransforms

For Each

A continuación, se muestra un ejemplo de cómo procesar los elementos XSLTransforms en una colección.

Dim xsl As XSLTransform
For Each xsl In Application.XMLNamespaces.XSLTransforms
	
Next xsl

Add

Devuelve un objeto XslTransform que representa una transformación XSL (Extensible Stylesheet Language Transformation) agregada a la colección de transformaciones XSL para un esquema especificado.

Add (Location, Alias, InstallForAllUsers)

Sub AddXSLT() 
 Dim objSchema As XMLNamespace 
 Dim objTransform As XSLTransform 
 
 Set objSchema = Application.XMLNamespaces("SimpleSample") 
 Set objTransform = objSchema.XSLTransforms _ 
 .Add("c:\schemas\simplesample.xsl") 
 
End Sub

Arguments

Un argumento con nombre

Location - String

Optional arguments

Los siguientes argumentos son opcionales

Alias (String) - Nombre de la transformación XSLT tal y como aparece en la Biblioteca de esquemas.

InstallForAllUsers (Boolean) - True si todos los usuarios que inician sesión en un equipo pueden tener acceso al nuevo esquema y utilizarlo.

Count

Devuelve un Long que representa el número de XSLTransforms de la colección.

Dim lngCount As Long
lngCount = Application.XMLNamespaces(1).XSLTransforms.Count

Item

Devuelve un objeto XslTransform de una colección.

Item (Index)

Index: El objeto individual que se va a devolver.

Dim xsl As XSLTransform
Set xsl = Application.XMLNamespaces(1).XSLTransforms(Index:=1)