Bonjour
Concrètement tu as 23 OptionButton dans ton Userform6
Le tableau NbLgOption est dimensionné pour 30 OptionButton !!!!!!!!
La macro se base sur la taille du tableau
For K = 1 To UBound(NbLgOption)
alors quand la variable K dépasse 23 ---> message d'erreur car elle ne trouve pas l'OptionButton24
A quoi te sert les procédures
Private Sub OptionButton24_Click()
Private Sub OptionButton25_Click()
et les suivantes ?
Pour ne plus avoir d'erreur 2 solutions
Tu augmentes dans l'Userform6 le nombre d'OptionButton de 7
ou
Tu diminues le nombre d'éléments de 7 dans le tableau NbLgOption