Developpez.com

Une très vaste base de connaissances en informatique avec
plus de 100 FAQ et 10 000 réponses à vos questions

Developpez.com - Microsoft Office
X

Choisissez d'abord la catégorieensuite la rubrique :


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

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.



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



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



II. L'objet DOCUMENT



Valid XHTML 1.1!Valid CSS!

Copyright © 2008 developpez Developpez LLC. Tous droits réservés Developpez LLC. Aucune reproduction, même partielle, ne peut être faite de ce site et 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.

Responsables bénévoles de la rubrique Microsoft Office : Pierre Fauconnier - Arkham46 -