VBA to change the file password and save for a .ppsm file ?

[John Wilson]

The code to do this is straightforward but how are you going to ensure they press the button or even enable macros??

Sub password()
ActivePresentation.password = "1234"
ActivePresentation.Save
End Sub