Your code calls a sub named AltPrintScreen, via:
Call AltPrintScreen
but you haven't included that.

Furthermore, your code has Workbook_Open, but that's for Excel, not Word. What application is this code for?

PS: Please don't post code that isn't directly connected to the problem. You've posted a bunch of code relating to spin buttons, plus your UserForm_Initialize and CreateShortCut code, but there's nothing to indicate how or whether they're relevant - only the CommandButton1_Click and the missing AltPrintScreen subs appear relevant.

__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]