Udostępnij za pośrednictwem

Programowe dodawanie kształtów do dokumentu programu Visio

  • Artykuł

Kształty można dodawać do dokumentu programu Microsoft Office Visio, pobierając wzorce z wzornika i upuszczając kształty na aktywnej stronie.

Aby uzyskać więcej informacji, zobacz dokumentację referencyjną VBA dotyczącą metody Microsoft.Office.Interop.Visio.Documents.Add, Microsoft.Office.Interop.Visio.Application.ActivePage i Microsoft.Office.Interop.Visio.Page.Drop.

Dodawanie kształtów do dokumentu programu Visio

Aby dodać kształty do dokumentu programu Visio

  • Po aktywnym dokumencie pobierz wzorce z kolekcji Documents.Masters i upuść kształty w aktywnym dokumencie. Wzorzec można pobrać przy użyciu nazwy indeksu lub wzorca.

    Poniższy przykład kodu tworzy pusty dokument programu Visio, a następnie otwiera go za pomocą zadokowanego wzornika Podstawowe kształty . Następnie kod pobiera kilka kształtów i usuwa je na aktywnej stronie.

    this.Application.Documents.Add("");

Visio.Documents visioDocs = this.Application.Documents;
Visio.Document visioStencil = visioDocs.OpenEx("Basic Shapes.vss",
    (short)Microsoft.Office.Interop.Visio.VisOpenSaveArgs.visOpenDocked);

Visio.Page visioPage = this.Application.ActivePage;

Visio.Master visioRectMaster = visioStencil.Masters.get_ItemU(@"Rectangle");
Visio.Shape visioRectShape = visioPage.Drop(visioRectMaster, 4.25, 5.5);
visioRectShape.Text = @"Rectangle text.";

Visio.Master visioStarMaster = visioStencil.Masters.get_ItemU(@"5-Point Star 7");
Visio.Shape visioStarShape = visioPage.Drop(visioStarMaster, 2.0, 5.5);
visioStarShape.Text = @"Star text.";

Visio.Master visioHexagonMaster = visioStencil.Masters.get_ItemU(@"Hexagon");
Visio.Shape visioHexagonShape = visioPage.Drop(visioHexagonMaster, 7.0, 5.5);
visioHexagonShape.Text = @"Hexagon text.";

Powiązana zawartość