Beispiele (Download)

Zweig mit mehr als sechs Ästen

In der letzten Visio-Schulung beschwerte sich ein Teilnehmer über das Shape „Zweige schräg“. Dort könne man nur bis zu sechs Zweige herausziehen. Er benötigt allerdings acht Linien. Kein Problem: Im ShapeSheet muss man nur zwei weitere Zeilen für die Controls (die gelben Steuerelemente) einfügen und die Formeln von oben nach unten kopieren. Außerdem muss man … Continue reading Zweig mit mehr als sechs Ästen

Bilder mit transparentem Hintergrund

Übrigens: Wenn Sie in Visio ein Bild mit transparentem Hintergrund (also GIF, PNG oder TIF) einfügen und dann dieses Bild komprimieren, wird der transparente Hintergrund durch eine Farbe ersetzt. Das Bild wird intern als JPEG gespeichert und unterstützt deshalb keine Transparenz. Das Gleiche passiert manchmal beim Vergrößern oder Verkleinern eines Bildes, beziehungsweise beim Zoomen – … Continue reading Bilder mit transparentem Hintergrund

Shapetexte verknüpfen

Mit der Funktion Shapetext kann man Texte zwischen zwei Shapes verknüpfen. Man muss noch nicht einmal das ShapeSheet bemühen – es funktioniert über Einfügen / Feld. Man muss lediglich den Namen des anderen Quell-Shapes ermitteln (Entwicklertools / Shape-Name). Und dann eingeben: =SHAPETEXT(Sheet.xx!TheText) Es funktioniert auch blattübergreifend.

Nicht druckbar und nicht sichtbar

Schöne Frage in der heutigen Visio-Schulung: Ein Teilnehmer zeigt mir eine Tabelle, die aus Rechtecks-Shapes bestehen. Damit diese Felder als Pflichtfelder gekennzeichnet sind, wurde ein großes, farbiges Rechteck unterlegt. Dieses wird auf nicht druckbar gesetzt (Entwicklertools / Verhalten). Die darüberliegenden Rechtecke sind ohne Füllfarbe formatiert. Ärgerlicherweise klickt man nun durch sie hindurch. Sie sind sehr … Continue reading Nicht druckbar und nicht sichtbar

Esc funktioniert auch

Amüsant, was ich alles in Visio-Schulungen von Teilnehmern lerne. Ich wechsel mit der Tastenkombination [Strg] + [1] auf der Zeigertool (den weißen Standardmauszeiger). Es geht auch mit mehrmaligem Drücken der Taste [Esc].

Multishape

Das Bodenshape und das Shape „Schuss“ =================================== Und so habe ich das Shape erstellt: Ich ziehe die sieben Shapes auf das Zeichenblatt und sehe sie mir an: Es fällt auf, dass einige der Shapes gruppiert sind. Da es schwierig ist eine Gruppe auszublenden (weil das Gruppenshape auf den einzelnen Shapes liegen und die Gruppe selbst … Continue reading Multishape

Länge einer Linie: LengthIU

Folgende Zeilen Code berechnen die Länge einer Linie: Sub LängeAnzeigen() Const ShapeLinieAnzeigen As String = „Dynamischer Verbinder“ Dim i As Long   For i = 1 To ActivePage.Shapes.Count If ActivePage.Shapes(i).Name Like „*“ & ShapeLinieAnzeigen & „*“ Then ActivePage.Shapes(i).Text = Format(Application.ConvertResult(ActivePage.Shapes(i).LengthIU, „in“, „mm“), „0.00“) End If Next i End Sub Erklärung: Die Eigenschaft LengthIU liefert die … Continue reading Länge einer Linie: LengthIU

Ein weiterer Bug – im ShapeSheet

Eigentlich mag ich Visio sehr gerne. Cleveres Programm! Allerdings finde ich in der Version 2016 leider sehr viele Bugs. Beispielsweise folgender: Ich nehme Bezug im ShapeSheet auf eine Zelle des Abschnitts „Daten“. Beispielsweise so: =User.Dateinummer&“-„&Prop.ShapeNumber Ich ändere den Wert der Zelle, auf den Bezug genommen wird. Visio löscht mir die Zeilen. So kann ich nicht … Continue reading Ein weiterer Bug – im ShapeSheet