Sdílet prostřednictvím

Postupy: Ukládání dokumentů aplikace Visio prostřednictvím kódu programu

  • Článek

Uložit dokumenty aplikace Microsoft Office Visio několika způsoby:

  • Chcete uložte změny v existujícím dokumentu.

  • Uložit nový dokument nebo uložit dokument pod novým názvem.

  • Uložte dokument se zadanými argumenty.

Další informace naleznete v referenční dokumentaci k VBA Microsoft.Office.Interop.Visio.Document.Save metody, Microsoft.Office.Interop.Visio.Document.SaveAs metoda, a Microsoft.Office.Interop.Visio.Document.SaveAsEx metoda.

Uložení stávajícího dokumentu

Uložit dokument

  • Volání Microsoft.Office.Interop.Visio.Document.Save metodu Microsoft.Office.Tools.Visio.Document třídy dokumentu, který byl dříve uložen.

    Chcete-li použít tento příklad kódu, spusťte jej z ThisAddIn třídy v projektu.

    [!POZNÁMKA]

    Microsoft.Office.Interop.Visio.Document.Save Metoda vyvolá výjimku, pokud ještě nebyl uložen nový dokument aplikace Visio.

    Me.Application.ActiveDocument.Save()

    this.Application.ActiveDocument.Save();

Uložení dokumentu s novým názvem.

Použití Microsoft.Office.Interop.Visio.Document.SaveAs metoda uložit nový dokument nebo dokument s novým názvem.Tato metoda vyžaduje zadání nového názvu souboru.

Aktivní aplikace Visio dokument uložit pod novým názvem.

  • Volání Microsoft.Office.Interop.Visio.Document.SaveAs metodu Microsoft.Office.Tools.Visio.Document chcete uložit pomocí úplnou cestu včetně názvu souboru.Pokud název souboru již existuje v této složce, je tiše přepsány.

    Chcete-li použít tento příklad kódu, spusťte jej z ThisAddIn třídy v projektu.

    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);

Uložení dokumentu s novým názvem a zadané argumenty

Použití Microsoft.Office.Interop.Visio.Document.SaveAsEx metoda uložit dokument pod novým názvem a určit všechny argumenty použitelné pro dokument.

Uložit dokument s novým názvem a zadané argumenty

  • Volání Microsoft.Office.Interop.Visio.Document.SaveAsEx metodu Microsoft.Office.Tools.Visio.Document chcete uložit pomocí úplnou cestu včetně názvu souboru.Pokud název souboru již existuje v této složce, je vyvolána výjimka.

    Následující příklad kódu uloží aktivní dokument pod novým názvem, označí dokument jen pro čtení a zobrazí dokument v seznamu naposledy použitých dokumentů.Chcete-li použít tento příklad kódu, spusťte jej z ThisAddIn třídy v projektu.

    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));

Probíhá kompilace kódu

Vyžaduje následující příklad kódu:

  • Chcete-li uložit dokument s názvem nový adresář s názvem Test musí být umístěny ve složce Dokumenty (pro systém Windows XP a starší) nebo do složky Dokumenty (pro systém Windows Vista).

Viz také

Úkoly

Postupy: Vytváření nových dokumentů aplikace Visio prostřednictvím kódu programu

Postupy: Otevírání dokumentů aplikace Visio prostřednictvím kódu programu

Postupy: Zavírání dokumentů aplikace Visio prostřednictvím kódu programu

Postupy: Tisk dokumentů aplikace Visio prostřednictvím kódu programu

Koncepty

Přehled modelu objektu aplikace Visio

Další zdroje

Řešení aplikace Visio