title: How to get results reported to email from macro action PPT
body: <p>I have a PPT quiz that functions of macro actions. It counts the <code>numberCorrect</code> and the <code>numberWrong</code> and reports these scores to the user at the end of the quiz when they press the "see my results" box. </p>
  
  <p>I would like these scores to be automatically reported to me when they select this box because I do not want the users taking the test numerous times prior to submitting their results. </p>
  
  <p>Everyone will be using a G-mail account. </p>
  
  <p>Here is my current visual basic module if that helps: </p>
  
  <pre><code>Dim UserName As String
  Dim numberCorrect As Integer
  Dim numberWrong As Integer
  
  Sub YourName()
  UserName = InputBox(Prompt:="Type Your Name!")
  MsgBox " Good Luck " + UserName, vbApplicationModal, " IEE Recognition Training"
  
  End Sub
  
  Sub Correct()
  MsgBox " Well Done! That's The Correct Answer " + UserName, vbApplicationModal, " IEE Recognition Training"
  numberCorrect = numberCorrect + 1
  ActivePresentation.SlideShowWindow.View.Next
  End Sub
  
  Sub Wrong()
  MsgBox " Sorry! That's The Wrong Answer " + UserName, vbApplicationModal, "  IEE Recognition Training"
  numberWrong = numberWrong + 1
  ActivePresentation.SlideShowWindow.View.Next
  End Sub
  
  Sub Start()
  numberCorrect = 0
  numberWrong = 0
  YourName
  ActivePresentation.SlideShowWindow.View.Next
  End Sub
  
  Sub Results()
  MsgBox ("You Got " &amp; numberCorrect &amp; " Correct Answers, " &amp; numberWrong &amp; " Wrong Answers, " &amp; UserName), vbApplicationModal, "  IEE Recognition Training"
  End Sub
  </code></pre>
  
  <p>Any help is greatly appreciated !!! Thanks!</p>