Hi xld, thanks for getting back to me - not sure how this would fit into my macro? When I run the "CreateWordDocument", this is automatically saving the document with a certain name?

Sub CreateWordDocument()
    With CreateObject("Word.Document")
        .Windows(1).Visible = True
        .SaveAs Filename:=("W:\ExampleLocation\Example UPLOAD " _
                                                                                & Format(Now(), "DD-MM-YYYY") & ".docx")
    End With