Thema Datum  Von Nutzer Rating
Antwort
21.02.2018 14:38:58 Hermdaddy
NotSolved
21.02.2018 14:52:50 Gast30478
NotSolved
21.02.2018 14:57:15 Hermdaddy
NotSolved
21.02.2018 18:48:21 Hermdaddy
NotSolved
21.02.2018 19:57:43 xlKing
NotSolved
22.02.2018 11:57:50 Hermdaddy
NotSolved
22.02.2018 13:29:31 Gast51382
NotSolved
22.02.2018 13:38:21 Hermdaddy
NotSolved
22.02.2018 14:20:28 Gast68385
NotSolved
23.02.2018 01:05:10 xlKing
NotSolved
Rot Textboxen gleichzeitig ansprechen
23.02.2018 11:59:56 Hermdaddy
Solved
23.02.2018 16:17:41 xlKing
NotSolved

Ansicht des Beitrags:
Von:
Hermdaddy
Datum:
23.02.2018 11:59:56
Views:
571
Rating: Antwort:
 Nein
Thema:
Textboxen gleichzeitig ansprechen

Hallo,

Falls es interessiert, ich habe selbständig(!!! :-) ) eine Lösung gefunden, war dann doch recht simpel. Ich habe für jeden meiner Fälle eine eigene Klasse gebaut und in der UserForm einfach folgende Codes implämentiert

For Each ctrl In Controls
      If TypeName(ctrl) = "TextBox" Then
        If Val(Right(ctrl.Name, 4)) >= 5131 And Val(Right(ctrl.Name, 4)) <= 5132 Then
          tbxcoll.Add New Indexfehler1
          Set tbxcoll(tbxcoll.Count).tbx = ctrl
        End If
    End If
   Next ctrl
   
   For Each ctrl In Controls
      If TypeName(ctrl) = "TextBox" Then
        If Val(Right(ctrl.Name, 4)) >= 5127 And Val(Right(ctrl.Name, 4)) <= 5128 Then
          tbxcoll.Add New Hoehenfehler
          Set tbxcoll(tbxcoll.Count).tbx = ctrl
        End If
    End If
   Next ctrl

Hat gut geklappt, funktioniert auch für alle 9 unterschiedlichen Fälle und ich bin wunschlos glücklich :-)
Danke für die Hilfe


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
21.02.2018 14:38:58 Hermdaddy
NotSolved
21.02.2018 14:52:50 Gast30478
NotSolved
21.02.2018 14:57:15 Hermdaddy
NotSolved
21.02.2018 18:48:21 Hermdaddy
NotSolved
21.02.2018 19:57:43 xlKing
NotSolved
22.02.2018 11:57:50 Hermdaddy
NotSolved
22.02.2018 13:29:31 Gast51382
NotSolved
22.02.2018 13:38:21 Hermdaddy
NotSolved
22.02.2018 14:20:28 Gast68385
NotSolved
23.02.2018 01:05:10 xlKing
NotSolved
Rot Textboxen gleichzeitig ansprechen
23.02.2018 11:59:56 Hermdaddy
Solved
23.02.2018 16:17:41 xlKing
NotSolved