AuthenticRange.InsertEntity

www.altova.com Imprimir este apartado Página anterior Subir un nivel Página siguiente

Inicio >  Referencia > Objetos > AuthenticRange >

AuthenticRange.InsertEntity

Método: InsertEntity (strEntityName as String)

 

Descripción

Reemplaza la selección del intervalo con la entidad indicada, que debe ser una de las entidades devueltas porGetEntityNames.

 

Errores


2001

El objeto de intervalo o su objeto relacionado ya no es válido.


2005

Nombre de entrada desconocido.

 

Ejemplos

' ---------------------------------------------------------

'                         VBScript

' Insertar la primera entidad de la lista de entidades disponibles

' ---------------------------------------------------------

Dim objRange

Set objRange = objPlugin.AuthenticView.Selection

 

' primero obtenemos el nombre de todas las entidades

' tal y como aparecen en el ayudante de entrada de XMLSpy

Dim arrEntities

objRange.GetEntityNames arrEntities

 

' insertamos la primera de la lista

If UBound(arrEntities) >= 0 Then

 objRange.InsertEntity arrEntities(0)

 objRange.Select()

Else

 MsgBox "Para este documento no hay entidades"

End If

 


© 2019 Altova GmbH