VBA - Optimisation de code

[cm1864]

Bonjour à tous,

Je réalise actuellement un formulaire pour faire des Quizz de formations simples.
Grâce à l'aide de ce forum (étant totalement novice en VBA), j'ai pu presque arriver à mes fins.
Voici ce que je veux faire, ce que j'ai fais et ce que je souhaite :
1 / Remplir le tableau excel avec les données enregistrées dans le formulaire : ok
2 / Lors de la validation, je souhaite que :
a - Les données soient transférées dans la feuille excel
b - Que le formulaire reste actif et qu'il affiche en rouge les mauvaises réponses et en vert les bonnes
c - Que les bonnes réponses soient calculées et qu'une note (13/20 par exemple) s'affiche dans un MsgBox
d - Que la note soit enregistrée dans la cellule de la colonne A de la feuille Questionnaire

Pour le moment, j'ai réussi à :
- Transférer les données vers la feuille excel
- Via un bouton, j'ai appris à mettre les couleurs en fonction du résultat
- Essayé de compter les bonnes réponses ...

Mon problème tient également du fait que mon code est astronomiquement long et peu adaptable si je rajoute des destinations au Quizz (ce qui sera le cas).

Pouvez-vous jeter un coup de d'oeil et me donner un coup de pouce svp ?
Je suis à votre disposition si vous avez besoin de renseignements complémentaires pour m'aider dans ce projet.

Excellente soirée à vous tous,
Meilleurs voeux,

cm1864

 

[gilbert_RGI]

Re : VBA - Optimisation de code

Bonjour

difficile d'utiliser car

UserForm1.carte_destination.Picture = LoadPicture("C:\Users\Paul\Desktop\Quizz formation\" & Sheets("Questionnaire").Range("E2").Value & ".jpg")

 

[cm1864]

Re : VBA - Optimisation de code

Bonjour,

Merci de l'intérêt que vous portez à mon problème.
Si cette ligne vous dérange, vous pouvez tout à fait la supprimer. C'est un détails.
Ma priorité étant de réussir à "noter" l’exercice automatiquement.

Restant à votre disposition si vous avez besoin d'autres informations / remarques pour me venir en aide,
Bien à vous,

cm1864