Programmierung

2 thoughts on “Programmierung”

  1. Hallo Dr. Visio,
    ist es möglich aus einer Excel-Tabelle heraus ein Zeichenblatt mit Netzwerk-Shapes zu füllen (z.B.: 1xFirewall, 5x Switch, 4xServer, 10xWorkstations, 2xEthernet, 2xDrucker, etc.), die dann auf dem Zeichenblatt im Raster angeordnet werden?

    1. Hallo Herr Mosbach,
      Per VBA funktioniert das. Man kann Shapes aus der Schablone ziehen:
      Beispielsweise so – für das Shape „Entscheidung“ aus der Schablone „Flussdiagramm“:
      Sub Shape_Aus_Schablone01()
      Dim vsDokument As Document
      Dim vsMaster As Master
      Set vsDokument = _
      Documents(„BASFLO_M.vssx“)
      Set vsMaster = vsDokument.Masters(„Entscheidung“)
      ActivePage.Drop vsMaster, 3, 4
      End Sub
      schöne Grüße
      Rene Martin

Schreibe einen Kommentar

Deine E-Mail-Adresse wird nicht veröffentlicht. Erforderliche Felder sind mit * markiert