Hello... i have currently undertaken a project for my school (i'm a student) i have just been learning vba online.. but i am creating a PowerPoint interlaced with VBA (macros) i need to "add" numbers as in "Please enter number" then like 1 and the total is what was there plus one as in (display 5) (user 1) = newdisplay 6... myn wont work... dont know what to do.. this is what i have done...
-----
Public userName, userPoints, userTotal

Sub askSkoolpoints()
userPoints = InputBox(prompt:="Total", _
Title:="Points")
ActivePresentation.Slides(2).Shapes(3).TextFrame.TextRange.Text = userPoints + (ActivePresentation.Slides(2).Shapes(3).TextFrame.TextRange.Text)

End Sub

thank you very much

I would take over the world, but they wont give me the source code... Anon