Come la controparte diagraming al Microsoft Office Suite di prodotti, Visio consente ai professionisti di mettere insieme gli effetti grafici di informazioni ad esempio organizzazioni, processi e diagrammi. Inserimento di forme nel diagramma di Visio VBA è possibile eseguire una procedura relativamente semplice e lineare che anche un novizio utente di Visio. Un diagramma è inutile senza le necessarie forme e rappresentazioni visive che avete bisogno, quindi è un passo importante per imparare.

Istruzioni

1

Avviare l'editor di Visual Basic di Visio e aprire il file che si desidera inserire forme in.

2

Digitare le seguenti righe di codice per copiare le forme di origine in modo che è possibile inserire il documento di Visio nel passaggio successivo:

Me.Application.Documents.Add("")

Dim copyPage come Visio

Dim pastePage As Visio

Dim rettangolo As Visio. Shape = Nothing

Dim ovale As Visio. Shape = Nothing

3

Comando di Visual Basic per aggiungere le forme alla nuova pagina utilizzando le seguenti righe di codice:

Dim visioPages As Visio.Pages = Me.Application.ActiveDocument.Pages

visioPages.Add()

4

Copiare le forme del diagramma di Visio utilizzando Visual Basic, eseguendo le seguenti righe di codice:

Provare

copyPage = visioPages(1)

rectangle = copyPage.DrawRectangle(1.1, 2.2, 4.5, 6.7)

oval = copyPage.DrawOval(1, 8.75, 3.5, 6.25)

Catch ex As Exception

System.Windows.Forms.MessageBox.Show(ex.Message)

End Try

5

Continuare a utilizzare i comandi "Try" e "End Try", con i rispettivi parametri pieni tra i due al fine di inserire forme aggiuntive. Specificare i nomi degli stessi come "ovale" o "rettangolo" di cambiare che tipo di forma è inserito nel documento.