Frame mit variable ansprechen
24.12.2022 14:56:38
boris
Ich versuche Optionbutton in mehrer Frames in einer Userform mit einer Sub ab zufragen. deshalb möchte ich die FrameNummer durch eine Variable ersetzten. Zum Beispiel me.Frame1. durch die Variable FraNr Also etwa so in der Art me.FrameFraNr Bis jetzt bin ich kläglich gescheitert :-)
Public CountBis As Byte
Public CountVon As Byte
Public FraNr As Byte
Private Sub CheckOpB()
Dim Durchlauf As Byte
Durchlauf = 0
For Count = CountVon To CountBis
Durchlauf = Durchlauf + 1
If Frame1.Controls("optionbutton" & Count).Value = True Then ' In der sieser Zeile soll die FrameNummer durch die variable erst werden :-)
MsgBox Me.Controls("optionbutton" & Count).Caption
Exit For
End If
Next
MsgBox "Durchlauf" & " " & Durchlauf
End Sub
Private Sub CheckFrame1_Click() ' Der Commandobutton soll Frame1 abfragen
CountVon = 1
CountBis = 4
FraNr = 1
CheckOpB
End Sub
Private Sub CheckFrame2_Click() ' ' Der Commandobutton soll Frame2 abfragen
CountVon = 5
CountBis = 7
FraNr = 2
CheckOpB
End Sub