ich habe ein Excel-Blatt mit mehreren Buttons (direkt auf dem Blatt, nicht per Formular).
Nun möchte ich die Beschriftung des Buttons dynamisch ändern, was ich zunächst mit folgendem Befehl versucht habe:
Sheets("Warenkorb").OLEObjects("CommandButton5").Object.Caption = "Test"
Dies resultierte allerdings in einem Laufzeitfehler 1004 (Am Blattschutz liegt's nicht - der ist deaktiviert).
Nach Recherche in diesem und anderen Foren habe ich noch einige andere Wege ausprobiert, allerdings alle erfolglos (in Klammer die jew. Fehlermeldung):
activesheeet.OLEObjects("commandbutton5").Object.Caption = "Test" (424 objekt erforderlich)
CommandButton5.Caption = "Test" (424 objekt erforderlich)
Sheets("Warenkorb").Shapes("CommandButton5").Object.Caption = "Test" (5 ungültiger Prozeduraufruf oder ungültiges Argument)
Nun bin ich (fast) ratlos - eine Vermutung habe ich noch, die ich aber nicht verifizieren konnte:
Möglicherweise liegt der Laufzeitfehler 1004 daran, dass die Commandbuttons mit den von mir verwendeten Nummern nicht existieren (Das Blatt hatte vorher jede Menge Buttons, ich habe allerdings massiv "entrümpelt"). Ich habe allerdings noch nicht herausgefunden, welche Nummern die Buttons tatsächlich haben - das Menü unter der rechten Maustaste hilft mir hier nicht weiter, und auch im VBA-Editor habe ich die Buttons nicht finden können.
Über sachdienliche Hinweise freut sich
Micha