Letzte Woche kam die Frage, ob man die Shape-Daten in Visio auch beim Drüberfahren anzeigen lassen kann. Natürlich war meine Antwort „nein“ – wissend, dass man mit einem kleinen Skript so etwas programmieren kann:
ActiveWindow.Selection(1).Cells(„Comment“).FormulaU = „“““Anzahl der Lautsprecher“ & vbCr & Me.txtAnzahl.Value & „“““
Oder man verweist auf die andere Zelle im ShapeSheet:
=“Anzahl der Lautsprecher: „&Prop.Anzahl_der_Lautsprecher
Aber beide Lösungen sich etwas mühsam – deshalb empfehle ich lieber Datengrafiken.
