TextBox definieren
04.02.2008 15:00:00
Jens
ich habe in einem Arbeitsblatt eine TextBox eingestellt. Jetzt möchte ich via einer einzigen Taste zu dieser TextBox springen und diese vor der neuen Eingabe leeren.
Dazu habe ich in "Diese Arbeitsmappe" folgenden Code geschrieben:
Option Explicit
Private Sub Workbook_Open()
Application.OnKey "{F3}", "Modul2.suchen"
End Sub
In Modul2 steht volgender code drin:
Option Explicit
Sub suchen()
TextBox1.Activate
TextBox1.Delete
End Sub
Leider kommt die Fehlermeldung, dass die Variable TextBox1 nicht definiert ist.
Wie definiere ich diese?
Danke für eure Hilfe.
Viele grüße jens
Anzeige