Textbox via VBA beschriften?
26.08.2004 13:54:43
Hobbit2000
ich erzeuge mit VBA eine Textbox in einem Diagramm und möchte diese nun mit einem Text füllen, in meinem Fall ist der Text "120 %". Ich benütze dazu folgenden Code.
Private Sub CommandButton1_Click()
Dim d as String
d = Charts(1).Shapes.AddTextbox(msoTextOrientationHorizontal, 78, 30, 105.19, 20.37).Name
Charts(1).Shapes(d).Characters.Text = "120 %"
End Sub
Die Textbox wird erzeugt aber danach bekomme ich immer eine Fehlermeldung. Woran liegt das? Hat irgendwer eine Idee?
Vielen Dank Hobbit2000
PS: Habe diese Frage auch schon in einem anderen Forum gepostet habe dort aber bis jetzt noch keine Antwort erhalten.
Anzeige