Re: RadioButton's das unbekannte Wesen :-(
Verfasst: Fr 3. Feb 2017, 13:45
In Deinen Radiobuttons gibt's eine Eigenschaft, die heißt "Gruppenname". Da trägst Du für alle Radiobuttons die Du in einer Gruppe haben willst denselben Wert ein. (Für's Makro unten hab' ich "GruppeX" verwendet.
Dann sollte das Makro unten funktionieren:
... ich hab' die rechte der 2 Gruppen bearbeitet - das ist die wo sich mehrere Buttons simultan aktivieren ließen!
Dann sollte das Makro unten funktionieren:
Code: Alles auswählen
Sub RBInfo(oEvent AS OBJECT)
Dim oGrp As Object
Dim oRadBut As Object
oEvent.Source.Model.Parent.GetGroupByName("GruppeX",oGrp)
For Each oRadBut In oGrp
If oRadBut.State Then
Print oRadBut.RefValue
Exit Sub
End if
Next
Print "KEIN Radiobutton mit Status = 1 gefunden!"
End Sub
