OptionButton - erreur MsgBox

[Bernard]

Salut à T.O.U.S

J'ai un USF avec 3 optionButton(OB)liés à 6 groupes de 5 optionbuttons(ob)
1er(OB) - 1 groupe d'(ob) s'affiche
2e(OB) - 2 groupes d'(ob) s'affichent
3e(OB) - 3 groupes d'(ob) s'affichent

j'aimerai un MsgBox indiquant une erreur si aucun optionbutton n'est sélectionné dans un des (ob), indépendament des autres (ob)

si dessous, le code du 1er(OB) et ses Sub
'*** 1 Level ***
If OptionButton1Level0Dec.Value = True Then
OneLevelZeroDecimal
ElseIf OptionButton1Level1Dec.Value = True Then
OneLevelOneDecimal
ElseIf OptionButton1Level2Dec.Value = True Then
OneLevelTwoDecimal
ElseIf OptionButton1Level3Dec.Value = True Then
OneLevelThreeDecimal
ElseIf OptionButton1Level4Dec.Value = True Then
OneLevelFourDecimal

J'ai essayé en reprenant le même shéma que ci dessus et en changeant à "And" et "Or" au lieu de ElseIf et False au lieu de True (et ommettant les Sub), mai le problème est que même si 2e(OB) et ses (ob) sont correctement checkés, le MsgBox apparaît car il n'y a rien dans 1er(OB), ce qui est normal vu que je rempli le 2e! comment faire pour lui expliquer que le MsgBox ne concerne que le (OB) en cours ??

Merci
bernard