Codage VBA
Debutant.VBA
Messages postés
9
Date d'inscription
Statut
Membre
Dernière intervention
-
Debutant.VBA Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
Debutant.VBA Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai un petit soucis avec ce codage
j'ais sur ma userform 5 OptionButton dont de 1à5
voici ce qu'ils décrivent :
OptionButton1= Marié(e)
OptionButton2=Célibataire
OptionButton3=concubinage
OptionButton4=veuve
OptionButton5=divorcé
l'Option choisi doit être inscrit dans la colonne I
mais ça ne fonctionne pas comme je veux
l'OptionButton1 et OptionButton2 marche mais le reste j’arrive pas à codé
voici le code j'ai puis inscris:
If OptionButton1.Value = True Then Cells(Insuv, 9) = "Marié" Else Cells(Insuv, 9) = "Célibataire"
là ça fonctionnne
mais je veux que les autres Options puissent s'ajouté je serrai très ravis de voir quelqu'un m'aidé
merci d'avance à touts
J'ai un petit soucis avec ce codage
j'ais sur ma userform 5 OptionButton dont de 1à5
voici ce qu'ils décrivent :
OptionButton1= Marié(e)
OptionButton2=Célibataire
OptionButton3=concubinage
OptionButton4=veuve
OptionButton5=divorcé
l'Option choisi doit être inscrit dans la colonne I
mais ça ne fonctionne pas comme je veux
l'OptionButton1 et OptionButton2 marche mais le reste j’arrive pas à codé
voici le code j'ai puis inscris:
If OptionButton1.Value = True Then Cells(Insuv, 9) = "Marié" Else Cells(Insuv, 9) = "Célibataire"
là ça fonctionnne
mais je veux que les autres Options puissent s'ajouté je serrai très ravis de voir quelqu'un m'aidé
merci d'avance à touts
1 réponse
-
Bonjour
Pourquoi pas :
If OptionButton1.Value = True Then Cells(Insuv, 9) = "Marié" elseif OptionButton2.Value = True Then Cells(Insuv, 9) = "Célibataire" end if
Et ainsi de suite pour chaque optionbutton
Vous pouvez aussi je crois récupérer la "caption" du bouton
Voirhttps://www.excel-pratique.com/fr/vba/controles.php
Bon courage
