Zugriff auf Schalter-Titel

[Hago]

Hallo,

ich habe eine Tabelle - über deren Kopf gibt es ca. 20 Schalter. Auf jedem Schalter steht ein kleiner Text, der bei Druck auf den Schalter in die Tabelle eingetragen wird. Dahinter muß der Nutzer dann irgendwelche Zahlen eintragen.

Dazu habe ich im Moment genau so viele SUBs wie Schalter.
Das Script ist aber immer das Gleiche, nur der Text ist jeweils anders.
Nun frage ich mich, ob es nicht möglich wäre, immer das selbe Script zu verwenden und den Titel des Schalters als Variable einzufügen.
Ich stelle mir vor, dass das geht - allein ich weiß nicht wie.

Kann mir da jemand helfen?

Gruß, Hago

[Toxitom]

Hey Hago,

Ich stelle mir vor, dass das geht - allein ich weiß nicht wie.

ja und nein.
Nein, weil du immer noch für jeden Schalter eine eigene Sub brauchst.

Ja, weil eine Routine ausreicht. Die rufst du dann mit den jeweiligen Parametern auf.

Das sieht dann wie folgt aus:

Code: Alles auswählen

REM eine solche sub für jeden Button
sub button_eins
    Werteintragen("mein Text")
end sub
'...
REM die Funktion an sich
sub Werteintragen( sWert as string)
  'die Varaible sWert beinhaltet jetzt den einzutragenden Text

end sub

Gruss
Thomas

[Hago]

Hallo Thomas,

so spare ich mir natürlich nicht viel Arbeit. :-)

Eigentlich habe ich ja gehofft, es gäbe irgendeine Möglichkeit, auf den Titeleintrag eines Schalters zuzugreifen, wie auf eine Calc-Zelle, so dass ich sowas schreiben könnte wie:
variable Wert = Titeleintrag des aktiven Schalters

Geht wohl nicht?

Gruß, Hago

[Toxitom]

Hey Hago,

Geht wohl nicht?

Natürlich geht das - nur: woher soll denn das Programm wissen, auf welchen Schalter du nun gedrückt hast? Die jeweiligen Ereignisse starten nur ein Makro können sich aber nicht selbst übergeben... - und dann müsstest du halt noch einen Listener programmieren, der auf die Ereignisse reagiert - und das wird dann deutlich noch aufwendiger.

Gruss
Thomas