Thema Datum  Von Nutzer Rating
Antwort
31.01.2013 12:56:10 KampfyX
NotSolved
01.02.2013 09:44:21 schokobons
NotSolved
01.02.2013 09:44:25 schokobons
NotSolved
01.02.2013 18:58:20 KampfyX
NotSolved
Rot Texboxen vergleichen ?
 02.02.2013 17:33:10 jhs
NotSolved
02.02.2013 19:46:17 Gast10457
NotSolved
04.02.2013 12:55:59 KampfyX
NotSolved
04.02.2013 14:02:30 KampfyX
NotSolved

Ansicht des Beitrags:
Von:
jhs		 Datum:
02.02.2013 17:33:10		 Views:
566		 Rating:
     
Antwort:
  Ja
Thema:
Texboxen vergleichen ?

Hallo,

die Antwort von Schokobons ist IMO nicht wirklich hilfreich, und nicht nur, weil sie kein Beispiel bringt. Das KeyDown-Event tritt bei jedem Tastendruck ein, aber dir geht es ja, wenn ich deine Frage richtig verstehe, jeweils um die komplette Eingabe. Dafür bietet sich eher das Exit-Ereignis an. Allerdings ist es mit einigem Aufwand verbunden, falls es sich umeine größere Anzahl von Textboxen handelt, weil du für jede Textbox folgenden Code erstellen musst wie hier im Beispiel für Textbox1 angegeben:

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
  Dim ctrl As Control, vnt As Variant
  For Each ctrl In Me.Controls
    If TypeOf ctrl Is MSForms.TextBox Then
      If Not ctrl Is ActiveControl Then
        vnt = Trim(ctrl.Value)
        If vnt <> "" Then
          If vnt = ActiveControl.Value Then
            MsgBox "Eingabe schon vorhanden"
            ActiveControl.Value = ""
            Cancel = True
            Exit For
          End If
        End If
      End If
    End If
  Next ctrl
End Sub

Leider hilft bei zahlreichen Textboxen in diesem Fall auch Klassenprogrammierung nicht weiter, weil das Exit-Event dort nicht zur Verfügung steht.

Gruß

 

Ihre Antwort
  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen
Thema: Name: Email:



  • Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
  • Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
  • Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
  • Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
  • Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei Antworten auf Ihren Beitrag zu benachrichtigen

Thema Datum  Von Nutzer Rating
Antwort
31.01.2013 12:56:10 KampfyX
NotSolved
01.02.2013 09:44:21 schokobons
NotSolved
01.02.2013 09:44:25 schokobons
NotSolved
01.02.2013 18:58:20 KampfyX
NotSolved
Rot Texboxen vergleichen ?
 02.02.2013 17:33:10 jhs
NotSolved
02.02.2013 19:46:17 Gast10457
NotSolved
04.02.2013 12:55:59 KampfyX
NotSolved
04.02.2013 14:02:30 KampfyX
NotSolved