Rather than moving the document, simply save it in your Downloads folder. For example:
Code:
ActiveDocument.SaveAs FileName:= "/Users/hl/Downloads/FileName.docx", FileFormat:=wdFormatXMLDocument, AddToRecentFiles:=False
ActiveDocument.Close
Application.Quit