Changing the TimeZone, when inserting time

So I created a little timestamp Macro and assigned a shortcut to help me when documenting on the fly

Sub TimeStamp()
'Inserts current date
Selection.InsertDateTime DateTimeFormat:="hh:mm AM/PM ", InsertAsField:=False
lbl_Exit:
Exit Sub
End Sub

My PC is set to Eastern Time zone, but I would like the time that's generated by the macro to be Mountain Time.
How would I change the code to do so?

(I know it would a lot easier if I just change the time zone setting on the PC itself, but I'm in a environment that doesn't allow that, and I have no pc admin previllages.)

If you are only using one time zone can you not just add +2 (or what ever the time difference is) to your formula when it inserts the time?

Originally Posted by darknation144

If you are only using one time zone can you not just add +2 (or what ever the time difference is) to your formula when it inserts the time?

Exactly what I'm looking for, but how would I achieve this?

Do you know the code?

Thanks

I can't get your module to work.