Microsoft Excel

Herbers Excel/VBA-Archiv

Informationen und Beispiele zum Thema MsgBox
BildScreenshot zu MsgBox MsgBox-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema CommandButton
BildScreenshot zu CommandButton CommandButton-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Userform
BildScreenshot zu Userform Userform-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema Label
BildScreenshot zu Label Label-Seite mit Beispielarbeitsmappe aufrufen
Informationen und Beispiele zum Thema OptionButton
BildScreenshot zu OptionButton OptionButton-Seite mit Beispielarbeitsmappe aufrufen

OptionButton prüfen


Betrifft: OptionButton prüfen von: RoterRitter
Geschrieben am: 11.10.2018 12:37:42

Hallo Community,

ich habe ein Problem. Ich habe ein Userform mit drei OptionButtons.

Nun will ich, dass ein OptionButton ausgewählt werden muss.

Ich dachte da an zwei Möglichkeiten:

1.) Wenn kein OptionButton ausgewählt wurde, kann man trotz klicken des CommandButtons "OK" gar nicht fortfahren

Oder

2.) Man kann fortfahren, aber dann kommt eine Fehlermeldung, dass kein OptionButton ausgewählt wurde.

Mein Code funktioniert leider nicht:

If Not (Me.OptionButton1 Or Me.OptionButton2 Or Me.OptionButton3) Then
    MsgBox "Bitte tragen Sie die geforderten Informationen ein ", vbCritical
    End
End If
Danke schon mal!

RR

  

Betrifft: was funktioniert nicht? owT von: Rudi Maintaire
Geschrieben am: 11.10.2018 12:45:18




  

Betrifft: AW: OptionButton prüfen von: Peter (hpo)
Geschrieben am: 11.10.2018 12:54:06

Hall RR,

probier mals dies:

Sub CommandButtons "OK"???? Hier den korrekten Commandbutton eingeben
If Me.OptionButton1 = False And Me.OptionButton2 = False And Me.OptionButton3 = False Then
MsgBox "Bitte tragen Sie die geforderten Informationen ein ", vbCritical
Exit Sub
End
Code was sonst gemacht werden soll
End If

Viele Grüße
Peter (hpo)


  

Betrifft: AW: OptionButton prüfen von: RoterRitter
Geschrieben am: 11.10.2018 13:06:58

Danke, hat geklappt!

ich bin sooooo dooof.

Dachte natürlich ich hab die OptionButtons umbenannt, aber hab nicht die OptionButtons umgenannt, sondern die Labels.... :D

Danke euch!


Beiträge aus dem Excel-Forum zum Thema "OptionButton prüfen"