Thema Datum  Von Nutzer Rating
Antwort
18.01.2012 09:39:59 Newbie
NotSolved
Blau UserForms in Schleife durchlaufen
 22.01.2012 23:52:43 Heiko
Solved
23.01.2012 09:48:52 Newbie
NotSolved
23.01.2012 22:06:41 Heiko
NotSolved
26.01.2012 08:34:55 Newbie
NotSolved
29.01.2012 19:19:27 Heiko
NotSolved
30.01.2012 00:52:15 Newbie
NotSolved

Ansicht des Beitrags:
Von:
Heiko		 Datum:
22.01.2012 23:52:43		 Views:
1136		 Rating:
     
Antwort:
 Nein
Thema:
UserForms in Schleife durchlaufen

Hallo Newbie,

so kannst du
1) alle geladenen Userforms in einer Schleife durchlaufen sowie
2) innerhalb jedes Userforms alle Steuerelemente in einer Schleife durchlaufen.

Ich hoffe, dies hilft dir weiter

Noch viel Erfolg wünscht Heiko


Public Sub subUserforms()
'alle Steuerelemente aller geladenen Userforms anzeigen

  Dim lngUFrmID As Long
  Dim ufrm As UserForm
  Dim ctl As MSForms.Control
    
  For lngUFrmID = 0 To UserForms.Count - 1
    Set ufrm = UserForms.Item(lngUFrmID)
    Debug.Print UserForms.Item(lngUFrmID).Name  'Userform ausgeben
    For Each ctl In ufrm.Controls               'Steuerelemente ausgeben
      Debug.Print ctl.Name
    Next ctl
  Next lngUFrmID
  
  Set ctl = Nothing
  Set ufrm = Nothing
    
End Sub

 

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
18.01.2012 09:39:59 Newbie
NotSolved
Blau UserForms in Schleife durchlaufen
 22.01.2012 23:52:43 Heiko
Solved
23.01.2012 09:48:52 Newbie
NotSolved
23.01.2012 22:06:41 Heiko
NotSolved
26.01.2012 08:34:55 Newbie
NotSolved
29.01.2012 19:19:27 Heiko
NotSolved
30.01.2012 00:52:15 Newbie
NotSolved