Insert Date Macro in MS Word 2010

I was able to get a macro working to insert date as text (and not as a field - which will cause the date entered to be updated each time the file is opened).  Furthermore, I managed to get the macro to insert a single space after the date is typed (and not insert a tab Text:=vbTab)

Sub TimeDateStampShort()
'
' TimeDateStampShort Macro
     Selection.InsertDateTime DateTimeFormat:="hh:mm am/pm yyyy-MMM-dd", InsertAsField:= _
       False, DateLanguage:=wdEnglishUS, CalendarType:=wdCalendarWestern, _
       InsertAsFullWidth:=False
   Selection.TypeText Text:=Space(1)
End Sub