Zeichen nutzen von "Sub-Name"
26.01.2018 11:05:58
"Sub-Name"
für mein folgendes Problem habe ich schon sehr viel im Forum gesucht, aber leider noch nichts ähnliches gefunden.
Also folgendes....
Ich habe ein Userform erstellt in dem ca. 20 Textboxen eingefügt sind. Diese habe ich durchnummeriert TB01, TB02, .... TB20.
Ich möchte jetzt die Funktion des Doubleclick der TB nutzen. Ich erstelle die passende "Sub" und schreibe jetzt in die 20 "Subs" meine Anweisungen. Alles funktioniert soweit alles einwandfrei. Jetzt mein Problem, bzw. meine Frage an Euch:
Um den Programmieraufwand zu minimieren, würde es mir helfen, wenn ich die Nummerierung der "Sub"
'
Private Sub TB01_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
in einer Variable weiter nutzen könnte. Kann mir jemand sagen, wie ich entweder aus dem "Sub- _
Namen" oder aus der Eigenschaft der Textbox, die Nummerierung in eine separate Variable schreiben kann?
So in der Art habe ich mir das vorgestellt:
Private Sub TB12_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
Dim Mode as Integer
Mode = 12 "Nummer der Textbox"
Call UserForm_Activate
End Sub
Vielen lieben Dank für Eure Unterstützung!