Sub ScratchMacro()
'A basic Word macro coded by Greg Maxey
Dim oDate As Date, strDate As String
  oDate = "1/20/2016"
  strDate = Format(oDate, "long date")
lbl_Exit:
  Exit Sub
End Sub