Office: (Office 2010) Button automatisch mit Zelleninhalt beschriften.

Hallo mal wieder,

ich habe mal wieder eine unlösbare Aufgabe bekommen.

In einem Dienstplan können sich alle Kollegen mit einem Dropdownfeld ihre jeweilige Einzelansicht aufrufen. Jetzt soll ein Button eingefügt werden der bei klick das Ding ausdruckt. Das ist nicht das Problem.

Sondern das: Der Button soll dann die Beschriftung automatisch ändern.

Beispiel:

Statt: "Einzelansicht drucken" soll "Einzelansicht von >Name< drucken" im Button stehen. und das sobald ein Name aus dem Dropdownfeld ausgewählt wurde.

Ich hatte zwar letztes Jahr einen VBA Kurs, aber wenn man es nicht täglich anwendet... :-(

gibt es da Möglichkeiten?

Gruß
Lincoln
Berlin

 

Hat sich erledigt, ich habe die Lösung.

Kann geschlossen werden.

Aber für alle die später auch das Problem haben, hier die Lösung die für mich funktioniert:

Command Button erstellen und in die Tabelle in der der Button ist:

Private Sub Worksheet_Calculate()
CommandButton1.Caption = Range("b6").Text
End Sub

einfügen, noch ein Druckmakro aufzeichnen. Fertig.

Klappt bei mir super.

Gruß
Lincoln
Berlin

Edit: Damit das funktioniert, muss die Quellzelle berechnet werden. D.h. man muss auf der Seite in einer Zelle den Wert der Quellzelle anzeigen lassen z.B. in B7: =B6.

Jetzt sollte es funktionieren.

 

Hallo lincoln,

mit

Code:

Private Sub Worksheet_Change(ByVal Target As Range)

CommandButton1.Caption.Caption = Range("B6").Text

End Sub

geht's auch ohne Berechnung.

Gruß,
Lutz

 

Cool, danke. Aber "Caption" ist doppelt, das müssen wir einmal abziehen.