Save word/excel file on Sharepoint with VBA

[mbrown1234]

I have managed to extract data from excel to a specific word format and save it on my local disc with use of VBA. Now I need to set the code so that the file is saved to a specific Sharepoint folder.
The code I got now is;

SaveName = Environ("UserProfile") & "\Desktop\ " & _
Format(Now, "yyyy-mm-dd hh-mm-ss") & ".docx"

.ActiveDocument.SaveAs2 SaveName

.ActiveDocument.Close
.Quit

Does anyone know how I can save it to Sharepoint?