Visio Shape erstellen – Text unter Shape

• Zunächst ein normales Rechtecke, oder was anderes zeichnen (Toolbar -> Zeichnen)
• Shape auswählen
• Fenster -> Shape-Sheet anzeigen
• Rechtsklick und Abschnitt einfügen
• Abschnitte „Controls“ und „Text transform“ –> OK
• (Es erscheint eine kleine gelbe Raute unter dem Shape)
• Abschnitt „Text Transform“ innerhalb des Shape-Sheets:
  • „TxtPinX“: Controls.Row_1
  • „TxtPinY“: Controls.Row_1.Y-TEXTHEIGHT(TheText,TxtWidth)/2

Der Text steht nun mittig unter dem Shape und kann mitsamt des Shape verschoben werden.