Convert Timestamp to GMT Time

[SteadyWord]

Greetings all,
I have a Macro I created to insert the current date time and it works well. It inserts the time for my local time (US CST/CDT), what I am trying to do is get this timestamp to add GMT Time instead of my local time. GMT Time for me is currently CST + 6 hours.

This is my current macro:

Sub Timestamp()
'
' Timestamp Macro
'
'
    Selection.InsertDateTime DateTimeFormat:="M/d/yyyy h:mm am/pm", _
        InsertAsField:=False, DateLanguage:=wdEnglishUS, CalendarType:= _
        wdCalendarWestern, InsertAsFullWidth:=False

End Sub

Any assistance would be appreciated.
Thanks
Wally