VBA - Wert in textbox per Enter für berechnung benutzen

Hallo

ich bin gerade dabei, ein kleines VBA-Programm zu schreiben und fast alles funktioniert wunderbar.

mein einziges problem ist, dass ich es nicht hinbekomme, einen wert in einer textbox per ENTER für eine berechnung zu benutzen. Bis jetzt bekomm ich das nur hin, wenn ich noch einen button daneben mache, der die zahl aus der textbox ausliest sobald man auf ihn klickt.

kann mir da jemand helfen?

mfg

LetzStart

 

Du hast diesen Beitrag zweimal eingestellt, dies nennt man Crossposting und ist hier nicht erwünscht, also unterlasse dies in Zukunft!

Gruß kingjon

 

Hallo LetzStart


Wenn die Textbox im Userform ist, nenne das Sub so >

Private Sub Textbox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
.......hier Dein Code
End Sub

"Exit" bedeutet > die Textbox wird verlassen, mit Enter oder mit Tab oder mit der Maus...
...dann wird der Code abgearbeitet.

Aber teste gut, es tut nicht immer was man gerne hätte
- wenn ein OK-Button als Default auf dem Form ist, wird das OK ausgeführt, da aber damit die Textbox verlassen wird, wird das Exit auch ausgeführt.
- das Verlassen der Box feuert immer, auch wenn nur der Fokus gewechselt wird.
- usw


Bei einem Button im Tabellenblatt funktioniert das nicht, dort müsstest Du das nehmen >

Private Sub Textbox1_Change)
.... Dein Code
End Sub

Aber Achtung > Bei jeder einzelnen Eingabe wird das Makro abgearbeitet.
Zahl "123456" eingeben bedeutet >
Tippe die "1" > Makro arbeitet
Tippe die "2" > Makro arbeitet
Tippe die "3" > usw....

Je nachdem was das Makro tun muss, ist der Aerger programmiert...

Gruss Urs

 

danke für die antworten

hab rausgefunden, dass es hierüber geht:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
(...Anweisungen...)
End sub


verwende übriegens excel 2010