Bonjour à tous,
Dans le cadre de mes études, j'ai une liste de 5 pages de vocabulaire d'anglais à apprendre. Pour m'aider et rendre la tâche moins pénible, j'ai commencé à faire un petit quizz sur PowerPoint.
Pour ce quizz, j'aimerai qu'à la fin, il me donne mon score alors j'ai essayé de le faire avec des macros.
J'ai donc fait trois codes : un pour une bonne réponse, un pour une mauvaise et un code "Reset" pour réinitialiser le score à la fin. Le problème, c'est que mon code fonctionnait parfaitement lorsque j'avais 5 questions mais depuis que j'en ai ajouté, ça ne fonctionne plus, le score reste à 0. Je ne comprends pas pourquoi.
Donc avant de rajouter d'autres questions, j'aimerai résoudre ce problème.
Voici les codes que j'ai réalisé :
Si quelqu'un pouvait m'aider à résoudre ce problème, je vous serait extrêmement reconnaissance.
Merci d'avance
Cherrylie
Dans le cadre de mes études, j'ai une liste de 5 pages de vocabulaire d'anglais à apprendre. Pour m'aider et rendre la tâche moins pénible, j'ai commencé à faire un petit quizz sur PowerPoint.
Pour ce quizz, j'aimerai qu'à la fin, il me donne mon score alors j'ai essayé de le faire avec des macros.
J'ai donc fait trois codes : un pour une bonne réponse, un pour une mauvaise et un code "Reset" pour réinitialiser le score à la fin. Le problème, c'est que mon code fonctionnait parfaitement lorsque j'avais 5 questions mais depuis que j'en ai ajouté, ça ne fonctionne plus, le score reste à 0. Je ne comprends pas pourquoi.
Donc avant de rajouter d'autres questions, j'aimerai résoudre ce problème.
Voici les codes que j'ai réalisé :
VB:
Sub Correct()
SlideLayout13.Score.Caption = (Score.Caption) + 1
End Sub
Sub Wrong()
SlideLayout13.Score.Caption = (Score.Caption) + 0
End Sub
Sub Reset()
SlideLayout13.Score.Caption = 0
End Sub
Si quelqu'un pouvait m'aider à résoudre ce problème, je vous serait extrêmement reconnaissance.
Merci d'avance
Cherrylie