Compartir a través de

Propiedad Document.VBProjectData (Visio)

  • Artículo

Devuelve los datos de proyecto de Microsoft Visual Basic almacenados con un documento. Solo lectura.

Sintaxis

expresión. VBProjectData

Expresión Variable que representa un objeto Document .

Valor devuelto

Byte()

Ejemplo:

Use la propiedad VBProjectData para determinar si un documento tiene un proyecto. En la macro siguiente se muestra cómo obtener una referencia a un documento en Microsoft Visio para determinar si dicho documento incluye un de proyecto. El código se ejecuta en un programa fuera del documento de Visio.

Private Sub Form_Load() 
 
 'Declare document variable 
 'and Array variable to hold project data. 
 Dim vsoDocument As Visio.Document 
 Dim btProjectData() As Byte 
 
 'Get the first object in the Documents collection 
 'of this instance of Visio. 
 Set vsoDocument = GetObject(, "Visio.Application").Documents(1) 
 
 'Populate the array with project data. 
 btProjectData = vsoDocument.VBProjectData 
 Debug.Print LBound(btProjectData); UBound(btProjectData) 
 
End Sub

Si el documento no tuviera ningún proyecto asociado, "0 -1" se notificaría en la ventana Inmediato. Si el documento tuviera un proyecto, el límite superior sería un número mayor que cero (0). Por ejemplo, "0 1535" indicaría que un proyecto tenía 1.536 bytes de datos.

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.