Frames

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
  • Frames von Dudzik, Matthias vom 16.02.2005 10:19:10
Bild

Betrifft: Frames
von: Dudzik, Matthias
Geschrieben am: 16.02.2005 10:19:10
Ich habe folgendes Problem: In einer UserForm sind mehrere Frames mit OptionButtons, die ich, abhängig von Bedingungen in einer For Next Schleife deaktivieren möchte. Leider klappt die Variablenzuweisung nicht so richtig.
Folgendes Beispiel:


Sub RahmenDeaktivieren() 
Dim frm As Frame 
For Each frm in Me.Frames 
If frm.Enabled = True Then 
frm.Enabled = False 
End If 
Next frm 
End Sub

Bei dieser Konstruktion bekomme ich eine Fehlermeldung in der For Each-Zeile, da die Frames-Gruppe nicht bekannt ist. Ich kann zwar jeden einzelnen Frame dort eingeben, jedoch ist damit die Schleife wirkungslos, da ich nur einen Frame anspreche. Welche Möglichkeiten gibt es, um dieses Problem zu beheben.
Vielen Dank im Voraus!!!
Bild

Betrifft: AW: Frames
von: bst
Geschrieben am: 16.02.2005 10:37:40
Morgen Matthias,
versuch mal sowas.
Gruß, Bernd
--

Private Sub CommandButton1_Click()
   Dim ctrl As MsForms.Control
   
   For Each ctrl In Me.Controls
      If TypeName(ctrl) = "Frame" Then
         ctrl.Enabled = Not ctrl.Enabled
      End If
   Next ctrl
End Sub

 Bild

Beiträge aus den Excel-Beispielen zum Thema "Frames"