Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
984to988
984to988
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Wurde Optionbutton in Frame gewählt?
19.06.2008 08:45:56
Specke
Hallo Experten,
ich habe eine Userform mit vielen zunächst versteckten Frames, in denen wiederum Optionbutton sind.
Wenn in der ersten Ebene ein Optionbutton angeklickt wird, wird der entsprechende Frame in der zweiten Ebene eingeblendet usw.
Am Ende möchte ich auswerten, ob in jedem eingeblendeten Frame eine Option ausgewählt wurde. Dazu habe ich folgenden Code zusammengebastelt:

Private Sub cmd_Ok_Click()
For Each Cntrl In Me.Controls
If TypeName(Cntrl) = "Frame" And Cntrl.Visible = True Then
   If Option_gewaehlt(Cntrl) = True Then
MsgBox "Es wurde was gewählt!"
Else
Cntrl.BorderStyle = 1
MsgBox "Bitte eine Option wählen!"
End If
End If
Next Control
Unload Me
End Sub


Function Option_gewaehlt(Rahmen As Frame) As Boolean
Dim ctl As Control
For Each ctl In Rahmen.Controls
If ctl.Value = True Then
Checkbox_gewaehlt = True
Exit Function
End If
Next
Checkbox_gewaehlt = False
End Function


Leider bricht das Makro in der fett markierten Zeile ab, Fehlermeldung: Argumenttyp ByRef unverträglich.
Was heißt das? Wie kann ich das Problem beheben?
Danke und Gruß
Specke

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wurde Optionbutton in Frame gewählt?
19.06.2008 09:01:53
Kawensmann
Hallo,
versuch's mal mit:
Function Option_gewaehlt(Rahmen As Control) As Boolean
Gruß
Kawensmann

Danke! Das war's! Gruß Specke owT
19.06.2008 09:16:00
Specke
Anzeige

82 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige