Press "Enter" to skip to content

Make PPT Quiz Game Report Card – percentages, no. of correct answers | PPT VBA Macro Tutorial

Download code: https://pptvba.com/quiz-game-percentage/
Download file: https://pptvba.com/quiz-game-percentage/

================

In this Microsoft PowerPoint Tutorial, we will be using Visual Basic Coding (VBA Coding) and making an interactive quiz game which can be used by teachers and in online courses.

We will be making a scorecard/report card slide and showing the following:
1. The number of correct answers.
2. The number of wrong answers.
3. The number of questions passed.
4. The total number of questions.
5. Points
6. Percentages

Download PPTM file and code:
http://tutorials.bhaveshshaha.com/download-interactive-powerpoint-quiz-game/

==========================================

Part 1:
I will be showing you how to make an interactive quiz game that can keep scores/points in PowerPoint using Visual Basic or VBA Code.

Part 2:
We will be adding labels for the number of correct and wrong answers, total and passed questions. We will also show the Points and Percentages scored.
We will also allow questions to be passed and for the user to retry the quiz game.

Part 3:
We will be adding a certificate slide which contains the name and the location of the user. Then, we will be printing the certificate slide and the result slide and save it as a .PDF file.

==========================================

Be responsible for the next part, comment on any one of my videos for any suggestions that you might have!

Comment below if you have any doubts.

I also do freelancing and make custom powerpoint games and templates. Contact me for more information.

==========================================

CODE:

Sub Correct()
Points.Caption = (Points.Caption) + 10
CA.Caption = (CA.Caption) + 1
Output = MsgBox(“Your Answer is correct, well done!”, vbOKOnly, “Correct Answer”)
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Wrong()
Points.Caption = (Points.Caption) – 5
WA.Caption = (WA.Caption) + 1
Output = MsgBox(“Your Answer is wrong.”, vbOKOnly, “Incorrect Answer”)
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Reset()
CA.Caption = 0
WA.Caption = 0
PQ.Caption = 0
TQ.Caption = 0
Points.Caption = 0
Percentages.Caption = 0
ActivePresentation.SlideShowWindow.View.Exit
End Sub

Sub CalculateResults()
TQ.Caption = 6
PQ.Caption = (TQ.Caption) – (CA.Caption) – (WA.Caption)

Percentages.Caption = (CA.Caption) * 100 / (TQ.Caption)
ActivePresentation.SlideShowWindow.View.Next
End Sub

Sub Retry()
CA.Caption = 0
WA.Caption = 0
PQ.Caption = 0
TQ.Caption = 0
Points.Caption = 0
Percentages.Caption = 0
ActivePresentation.SlideShowWindow.View.GotoSlide (1)
End Sub

==========================================

Bhavesh Shaha,
2002bhavesh@gmail.com
www.youtube.com/bhaveshshaha
www.instagram.com/basicallybhavesh

Video transcription:

Tags:

powerpoint quiz game,interactive powerpoint quiz game,percentage,quiz game for course,percentages in powerpoint quiz,how to make a powerpoint quiz game,create a powerpoint quiz game,how to make quiz in powerpoint,interactive quiz game,How to make Simple Visual Quiz in PowerPoint 2019,points percentage score in ppt quiz,ppt quiz,ppt quiz game,powerpoint quiz show,PowerPoint Interactive POINTS PERCENTAGE QUIZ game,ppt vba macros

Be First to Comment

    Leave a Reply

    Your email address will not be published. Required fields are marked *