Does anybody know why a PP Presentation with Counter Button will run on my PC but when I email it to somebody else - it wont run on theirs and they do have the same version of PP.

I tried the VB code as suggested in this forum

Dim Offset As Single
Dim CountNo As Long
Dim x As Single

Private Sub CommandButton1_Click()
Offset = ActivePresentation.PageSetup.SlideHeight + 10
CountNo = 0
' ADJUST THIS waitTime NUMBER WITH SECONDS DELAY BETWEEN COUNTER INCREMENTS
waitTime = 0.5
' ADJUST THIS maxCount NUMBER WITH MAXIMUM NUMBER COUNTER SHOULD REACH
maxCount = 5000
Do Until CountNo = maxCount + 1
ActivePresentation.SlideMaster.Shapes("Counter").T extFrame.TextRange.Text = CountNo
ActivePresentation.SlideMaster.Shapes("Counter").T op = ActivePresentation.SlideMaster.Shapes("Counter").T op + Offset
DoEvents
ActivePresentation.SlideMaster.Shapes("Counter").T op = ActivePresentation.SlideMaster.Shapes("Counter").T op - Offset
x = Timer
While Timer - x < waitTime
DoEvents
Wend
CountNo = CountNo + 92

If SlideShowWindows.Count = 0 Then
ActivePresentation.SlideMaster.Shapes("Counter").T extFrame.TextRange.Text = 1
ActivePresentation.SlideMaster.Shapes("Counter").T op = ActivePresentation.SlideMaster.Shapes("Counter").T op + Offset
DoEvents
ActivePresentation.SlideMaster.Shapes("Counter").T op = ActivePresentation.SlideMaster.Shapes("Counter").T op - Offset
Exit Do
End If

Loop
End Sub




It works perfectly on my PC. Any ideas ? Thanks

Couple of possible reasons.

Macro security is set too high for the code to run.

If you emailed it it might open in protected view. This would prevent the code altering the text.

__________________
Microsoft PowerPoint MVP 2007-2023
Free Advanced PowerPoint Tips and Tutorials

Thanks for replying - I think it may have been your code originally so thanks for that too
I sent the PP by email and the other person saved it to their machine.

I checked Trust Settings and ensured Macro's were enabled


Should I do something else ?

If they downloaded it tell them to right click on it >> Properties and see if there is an UNBLOCK button.

__________________
Microsoft PowerPoint MVP 2007-2023
Free Advanced PowerPoint Tips and Tutorials

Hi Again, Interestingly the other user doesn't see the UNBLOCK Tab but I do. You may have hit on something but I just cant figure it out :-(

UNBLOCK will only appear if they have at least 2010 version. And of course it's their security setting you need to check.

__________________
Microsoft PowerPoint MVP 2007-2023
Free Advanced PowerPoint Tips and Tutorials

Funny enough He has 2010
Anyway I know this might be a complete red herring but when I do a search on my machine for the program counter it appears in a xampp/perl//// folder. I don't know how or when it got there but he doesn't have it