Comment : enregistrer des documents Visio par programmation
Il existe plusieurs méthodes d'enregistrement de documents Microsoft Office Visio :
Enregistrer les modifications dans un document existant.
Enregistrer un nouveau document ou un document existant sous un nouveau nom.
Enregistrer un document avec des arguments spécifiés.
Pour plus d'informations, consultez la documentation de référence sur VBA pour les méthodes Microsoft.Office.Interop.Visio.Document.Save, Microsoft.Office.Interop.Visio.Document.SaveAs et Microsoft.Office.Interop.Visio.Document.SaveAsEx.
Enregistrement d'un document existant
Pour enregistrer un document
Appelez la méthode Microsoft.Office.Interop.Visio.Document.Save de la classe Microsoft.Office.Tools.Visio.Document d'un document enregistré précédemment.
Pour utiliser cet exemple de code, exécutez-le à partir de la classe ThisAddIn dans votre projet.
[!REMARQUE]
La méthode Microsoft.Office.Interop.Visio.Document.Save lève une exception si vous n'avez pas encore enregistré de nouveau document Visio.
Me.Application.ActiveDocument.Save()
this.Application.ActiveDocument.Save();
Enregistrement d'un document sous un nouveau nom
Utilisez la méthode Microsoft.Office.Interop.Visio.Document.SaveAs pour enregistrer un nouveau document ou un document existant sous un nouveau nom.Vous devez spécifier le nouveau nom de fichier.
Pour enregistrer le document Visio actif sous un nouveau nom
Appelez la méthode Microsoft.Office.Interop.Visio.Document.SaveAs du Microsoft.Office.Tools.Visio.Document que vous souhaitez enregistrer, prenant en paramètre un chemin qualifié complet incluant le nom du fichier.Si un fichier du même nom existe déjà dans ce dossier, il est automatiquement remplacé.
Pour utiliser cet exemple de code, exécutez-le à partir de la classe ThisAddIn dans votre projet.
Dim docPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + "\test\MyDrawing.vsd" Me.Application.ActiveDocument.SaveAs(docPath)
string docPath = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + @"\test\MyDrawing.vsd"; this.Application.ActiveDocument.SaveAs(docPath);
Enregistrement d'un document sous un nouveau nom avec des arguments spécifiés
Utilisez la méthode Microsoft.Office.Interop.Visio.Document.SaveAsEx pour enregistrer un document sous un nouveau nom et spécifier tous les arguments devant être appliqués au document.
Pour enregistrer un document sous un nouveau nom avec des arguments spécifiés
Appelez la méthode Microsoft.Office.Interop.Visio.Document.SaveAsEx du Microsoft.Office.Tools.Visio.Document que vous souhaitez enregistrer, prenant en paramètre un chemin qualifié complet incluant le nom du fichier.Si un fichier du même nom existe déjà dans ce dossier, une exception est levée.
L'exemple de code suivant enregistre le document actif sous un nouveau nom, marque le document en lecture seule et affiche le document dans la liste de documents Derniers fichiers utilisés.Pour utiliser cet exemple de code, exécutez-le à partir de la classe ThisAddIn dans votre projet.
Dim newDocPath As String = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + "\test\MyOtherDrawing.vsd" Me.Application.ActiveDocument.SaveAsEx(newDocPath, CShort(Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsRO) + CShort(Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsListInMRU))
string newDocPath = System.Environment.GetFolderPath(System.Environment.SpecialFolder.MyDocuments) + @"\test\MyOtherDrawing.vsd"; this.Application.ActiveDocument.SaveAsEx(newDocPath, ((short)Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsRO + (short)Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visSaveAsListInMRU));
Compilation du code
Cet exemple de code nécessite ce qui suit :
- Pour enregistrer un document portant un nouveau nom, un répertoire nommé Test doit se trouver dans le dossier Mes documents (Windows XP ou version antérieure) ou Documents (Windows Vista).
Voir aussi
Tâches
Comment : créer des documents Visio par programmation
Comment : ouvrir des documents Visio par programmation
Comment : fermer des documents Visio par programmation
Comment : imprimer des documents Visio par programmation
Concepts
Vue d'ensemble du modèle objet Visio