Office: welcher Button wurde gedrückt?

Hi,

Habe in einem Tabellenblatt mehrere Buttons.
Ich benötige die Caption eines gedrückten Buttons.
Wie kann ich diesen ermitteln?

Mit ActiveControl funktioniert es ja nicht in Tabellenblätter.

:)

 

Hallo ?,

versuch's mal mit Application.Caller und der Suche mit diesem Stichwort.

Grüße
EarlFred

 

Hi Mario,

verwendest du Formularsteuerelemente oder ActiveX-Steuerelemente?

 

Hi,

active-x

 

Hi Mario,

Code:

 

Hi Karin,

Dies müsste ich dann für jeden Button schreiben.
Sicherlich würde das funktionieren, aber funktioniert da keine resourcensparende Version in dem ich den Code nur einmal in einer Sub schreiben muss, und dieser Code dann über die Codes der Buttons aufgerufen wird?

 

Hi Mario,

du kannst das schon auslagern, aber aufrufen musst du die ausgelagerte Sub trotzdem:

Code:

Und nur um die Caption zu erhalten eine extra Sub - ob das sinnvoll ist???


Andere Variante - du verwendest Klassenprogrammierung.

 

Hi,

über ne Klasse? Hatte bisher nichts mit Klassen zu tun*cool.gif*
WEnn Du da ne Lösung hättest wäre ich dir dankbar. Ansonsten mach ichs über jeden einzelnen Buttoncode.

 

Hallo phobos,

als Anlage ein Beispiel für CommandButtons und Klassen-Programmierung.

Gruß Peter

 

Hi Mario,

im Anhang ein Beispiel - beim Öffnen der Arbeitsmappe werden alle vorhandenen CommandButton der Tabelle1 zu einer Klasse zusammengefasst, sodass für alle Button nur ein Click-Ereignis erforderlich ist.

 

Moin Ihr zwei.
Danke für die Beispiele. Die Funktionieren soweit*top

Ich hab den Code von KArin bei mir eingebaut.
Sobald ein Button gedrückt wird, geht eine Userform mit ner Listbox auf.
Hier wird eine Namensliste eingelesen und die Buttons die bereits einen Namen haben, werden wieder aus dieser Liste entfernt.

Hintergrund: Ich möchte jedem Button einen Namen aus einer Liste geben.
Jeder Name darf nur einmal ausgewählt werden können.

Code:

dieser Code steht in der Userform.

wie kann ich hier den Button ansprechen der in Klasse definiert wurde?

 

Hi Mario,

lade am besten deine Mappe hoch.

 

Hi Karin,

ok. dann lad ich mal die entschärfte Version hoch. Danke schon mal*Smilie

 

Hi Mario,

erkläre doch bitte mal detailliert, was genau gemacht werden und was das Ergebnis sein soll.

 

Moin Karin,

das soll ein Schichtplan ergeben.
Die Buttons im Blatt "Platz" sollen die verschiedenen Arbeitsplätze darstellen und mit den Namen des jeweils eingeteilten Mitarbeiters beschriftet werden.
Das ganze soll Tagesweise über 2-3 Wochen abgebildet werden können.

Vorgehen:
Durch klicken eines Buttons soll in die Listbox der Userform die Mitarbeiter eingelesen werden die an diesem Arbeitstag verfügbar sind(funktioniert) und die noch nicht an diesem Tag eingeteilt sind (dies probiere ich mit dem Thread hier in Erfahrung zu bringen).

btw.
aktuell muss ich noch den Code InitElemente von dir manuell ausführen bevor die Buttons reagieren.

Wenn Du noch mehr Infos brauchst, sag bescheid.

Vielen Dank Karin*Smilie