Simplifier l'exploitation des données après saisie dans un UserForm

[exene]

Bonjour,

Dans l'UserForm, il y 26 questions auxquelles une personne doit répondre par pas du tout d'accord, pas d'accord, d'accord, tout à fait d'accord. Après validation les données sont transférées en feuille3 et là j'ai été obligé de monter une usine à gaz pour exploiter les résultats. J'ai donc délaissé le fichier quand ce matin, je me suis rendu compte que ce n'est pas le texte qui est important mais le coefficient qui lui est attribué
Tout a fait d'accord = 4
d'accord = 3
Pas d'accord = 2
Pas du tout d'accord = 1

J'aimerais donc qu'à la validation du questionnaire, ce ne soit pas le texte qui soit validé mais son coefficient. Ne connaissant pas assez le langage Vba, je n'ai pas réussi à faire ce transfert

Ci-joint le fichier

 

[tototiti2008]

Re : Simplifier l'exploitation des données après saisie dans un UserForm

Bonjour exene 🙂

sur le code du bouton Valider (Private Sub Bt_Valider_Click()) dans le Userform1, tu dois changer l'écriture des Combobox de combobox4 à combobox29 dans la feuille sur ce modèle là :

change

Worksheets("Feuil3").Range("C" & InsMot).Value = UserForm1.ComboBox4.Value

en

Worksheets("Feuil3").Range("C" & InsMot).Value = UserForm1.ComboBox4.listindex +1

Edit : sinon on pourrait envisager une boucle...

 

[exene]

Re : Simplifier l'exploitation des données après saisie dans un UserForm

Bonjour,

Merci de ton aide, je vais essayer ta solution et revenir si je ne comprends pas l'utilisation de Listindex

@+