Les objets VISIO en VBA: Explications et exemples

Date de publication : 30 septembre 2008

Par Pierre Fauconnier (Pierre Fauconnier sur DVP)

Cet article détaille les objets utilisables via l'objet APPLICATION de VISIO

Version PDF (Miroir) Version hors-ligne (Miroir)

I. L'objet Application
I-A. Propriétés
I-A-1. Active (as integer)
I-A-2. ActivePrinter (as String)
I-A-3. AvailablePrinters As String()
I-A-4. ActiveDocument (as Document)(Défaut)
I-A-5. Application As Application
I-A-6. Name As String
I-A-7. Path As String
I-B. Méthodes
I-B-1. PurgeUndo()
I-B-2. Quit()
I-B-3. Redo()
I-B-4. Undo()
II. L'objet DOCUMENT

I. L'objet Application

I-A. Propriétés

I-A-1. Active (as integer)

I-A-2. ActivePrinter (as String)

Renvoie ou modifie le nom de l'imprimante active de VISIO (en lecture - écriture)

I-A-3. AvailablePrinters As String()

Renvoie la liste des imprimantes disponibles sous forme d'un tableau dont l'indice commence à 1


					Sub ListerImprimantes()
					    Dim Imprimantes
					    Dim i As Integer
					    
					    Imprimantes = Application.AvailablePrinters
					    
					    For i = 1 To UBound(Imprimantes)
					        Debug.Print Imprimantes(i)
					    Next i
					End Sub

I-A-4. ActiveDocument (as Document)(Défaut)

Syntaxe: Application.ActiveDocument

Renvoie l'objet Document actif

I-A-5. Application As Application

Syntaxe: Application.Application

renvoie l'objet Application de l'objet... Application. Je cherche toujours l'utilité de ce "serpent qui se mord la queue"

I-A-6. Name As String

Renvoie le nom de l'application VISIO (en lecture seule)

I-A-7. Path As String

Renvoie le chemin de l'application VISIO (en lecture seule)

I-B. Méthodes

I-B-1. PurgeUndo()

Syntaxe: Application.PurgeUndo

Vide la pile des actions utilisateur qui peuvent être annulées.

Voir aussi: Application.Redo, Application.Undo

I-B-2. Quit()

Syntaxe: Application.Quit

Ferme VISIO en proposant l'enregistrement des documents VISIO qui ont subi des modifications depuis le dernier enregistrement ou, à défaut, l'ouverture du document.

I-B-3. Redo()

Syntaxe: Application.Redo

Repète la dernière action réalisée via l'interface utilisateur.
Ne répète pas une action réalisée par code VBA

Voir aussi: Application.PurgeUndo, Application.Undo

I-B-4. Undo()

Syntaxe: Application.Undo

Annule la dernière action réalisée via l'interface utilisateur.
N'annule pas une action réalisée par code VBA

Voir aussi: Application.PurgeUndo, Application.Redo

II. L'objet DOCUMENT

Version PDF (Miroir) Version hors-ligne (Miroir)

Copyright © 2008 developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site ni de l'ensemble de son contenu : textes, documents et images sans l'autorisation expresse de Developpez LLC. Sinon vous encourez selon la loi jusqu'à trois ans de prison et jusqu'à 300 000 € de dommages et intérêts.