VBA Sub prüft wer sie aufgerufen hat

Hallo Reinhard,

nicht ganz so elegant, wie du's gern hättest: jede Taste ruft ihre Sub 
auf, und die wiederum die Auswertungs-Sub und übergibt dabei die 
Tastennummer als zusätzlichen Parameter.

Reinhard #. schrieb:
> Ja klar, das ist die zweitbeste Lösung.

Ist es nicht. Du kannst natürlich in einer Einheitsfunktion irgendwie 
die zuletzt gedrückte Taste bestimmen und danach verzweigen, aber es ist 
wesentlich einfacher und OO-gerechter, jeder Taste ihre Routine 
zuzuordnen, die weiss ja schon die Taste, und so kannst du sie an eine 
gemeinsame Auswertung übergeben, sofern das überhaupt sinnvoll ist, z.B. 
bei Zifferntasten - gibt es nichts gemeinsames, muss man das auch nicht 
in eine einzige Routine zwingen.

Einzusehen ist eine gemeinsame Behandlung bei 10 Zifferntasten oder 26 
Buchstaben, bei 4 Tasten ist das eher lachhaft.

Georg

Georg schrieb:
> Du kannst natürlich

Ja, aber wie?

Kannst das Makro im angehängtem Excel Dokument bitte entsprechend 
anpassen?

Gruß,
Thomas

Thomas schrieb:
> Ja, aber wie?

Du kannst den KeyPressed Event benutzen und den ASCII-Code in eine 
Variable schreiben, die du dann abfragst.

Prinzipiell ist der Umgang mit der Tastatur in VBA eventgesteuert. Was 
auch geht: in der Behandlungsroutine für den Button (für jeden eine 
eigene) schreibst du in eine Variable, welcher Button gedrückt wurde, 
und damit rufst du den gemeinsamen Code für alle Keys auf.

Georg