I have written code to map a network drive. The code will then copy a certain file to the drive, and remove the mapping after 3 seconds.
The letter Z is used to map. Please go through the code and change to suit.
This code works fine for me, but I am not sure you will be able to adapt for Sharepoint. Not an expert there, sorry.
Const sSource As String = "C:\testfile.xlsx" 'change to suit
.MapNetworkDrive "Z:", "\\FSERVER1\infomay" 'change to suit
If Len(Dir(sSource)) Then CreateObject("Scripting.FileSystemObject").copyfile sSource, "Z:\"
Application.Wait Now + TimeSerial(0, 0, 3)
On Error Resume Next
On Error GoTo 0