mit diesem Code füge ich eine horizontale Textbox ein:
Sub TextfeldEinfügen()
Dim TextShape As Shape
Set TextShape = ActiveSheet.Shapes.AddLabel(msoTextOrientationHorizontal, 20, 20, 1, 1)
TextShape.TextFrame.AutoSize = True
TextShape.TextFrame.Characters.Text = "blabla"
End Sub
In meinem Excel 2010 wird der Text horizontal eingefügt. In meinem Excel2007 erscheinen die Buchstaben untereinander. Woran könnte das liegen? Durch das Autosize und OrientationHorizontal müsste der Text doch nach rechts laufen.
Viele Grüße
Jens