Método Window.DockedStencils (Visio)

Devuelve los nombres de todas las galerías de símbolos acopladas en una ventana de dibujo de Microsoft Visio.

Sintaxis

expresión. DockedStencils( _NameArray()_ )

Expresión Variable que representa un objeto Window .

Parameters

Nombre	Obligatorio/opcional	Tipo de datos	Descripción
NameArray()	Obligatorio	String	Parámetro de salida. Matriz que recibe los nombres de las galerías de símbolos acopladas en una ventana.

Valor devuelto

Nothing

Comentarios

El método DockedStencils devuelve una matriz de cadenas: los nombres de las galerías de símbolos que se muestran en los paneles de galerías de símbolos acopladas de una ventana. Cuando la ventana es una ventana de dibujo, el número de paneles de galería de símbolos acoplados ( n ) es igual o mayor que cero y n es cero cuando la ventana no es una ventana de dibujo.

Si el método DockedStencils se ejecuta correctamente, NameArray() devuelve una matriz unidimensional de n cadenas indizadas de cero (0) a n - 1. El parámetro NameArray() es un parámetro out asignado por el método DockedStencils , cuyo propietario se devuelve al autor de la llamada. El llamador deberá realizar finalmente el procedimiento SafeArrayDestroy en la matriz devuelta. Observe que el procedimiento SafeArrayDestroy tiene como efecto secundario la liberación de las cadenas a las que hacen referencia las entradas de la matriz. Se produce un error en el método DockedStencils si NameArray() es null. (Microsoft Visual Basic y Visual Basic para Aplicaciones se encargan de destruir la matriz por usted).

Si strStencilName es la cadena devuelta por NameArray(StencilName), Documents.Item ( strStencilName) se ejecuta correctamente y devuelve un objeto Document que representa la galería de símbolos.

Ejemplo:

La siguiente macro de Microsoft Visual Basic para Aplicaciones muestra cómo usar el método DockedStencils para obtener los nombres de documento de todas las galerías de símbolos acopladas en la ventana activa. También imprime, en la ventana Inmediato, el nombre del documento activo y los límites inferior y superior de la matriz que contiene los nombres de galería de símbolos y, a continuación, enumera los nombres y las rutas de acceso de la galería de símbolos, también en la ventana Inmediato.

 
Public Sub DockedStencils_Example() 
 
 Dim astrStencilNames() As String 
 ActiveWindow.DockedStencils astrStencilNames 
 
 Dim intLowerBound As Integer 
 Dim intUpperBound As Integer 
 Dim intIndex As Integer 
 
 intLowerBound = LBound(astrStencilNames) 
 intUpperBound = UBound(astrStencilNames) 
 Debug.Print "Active document: " ActiveWindow.Document; " Lower bound:"; intLowerBound; " Upper Bound:"; intUpperBound 
 
 intIndex = intLowerBound 
 While intIndex <= intUpperBound 
 Debug.Print astrStencilNames(intIndex) 
 intIndex = intIndex + 1 
 Wend 
 
End Sub

Soporte técnico y comentarios

¿Tiene preguntas o comentarios sobre VBA para Office o esta documentación? Vea Soporte técnico y comentarios sobre VBA para Office para obtener ayuda sobre las formas en las que puede recibir soporte técnico y enviar comentarios.