VBA to save excel workbook to a Sharepoint site

Thank you for reading my post.

I was wondering if anyone could advise me or point me in the right direction on the below issue I am having.

I have the below VBA code to create a new project Tab within the project document which is saved on my Mac desktop. However I am looking for a piece of VBA code that will allow me to save a copy of the new tab as a new workbook thats created to a Sharepoint site with the same worksheet name thats created.


IS it at all possible as i'm using Office 365 for Mac.

Sub Copy_paste_tab()


Range("D5").Select
ExecuteExcel4Macro _
"FORMULA.REPLACE("" "",""_"",2,1,TRUE,FALSE,,FALSE,FALSE,FALSE,FALSE)"
Cells.Find(What:=" ", After:=ActiveCell, LookIn:=xlFormulas, LookAt:= _
xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:=False) _
.Activate


Range("A1").Select


Dim ws As Worksheet
Set wh = Worksheets(ActiveSheet.Name)
ActiveSheet.Copy After:=Worksheets(Sheets.Count)
If wh.Range("D5").Value <> "" Then
ActiveSheet.Name = wh.Range("D5").Value
EndIf
wh.Activate


EndSub

Code Tags Added
Your post does not comply with Rule 3 of our Forum RULES. Use code tags around code.

Posting code between [CODE] [/CODE] tags makes your code much easier to read and copy for testing, it also maintains VBA formatting.

Highlight your code and click the # icon at the top of your post window. More information about these and other tags can be found at http://www.excelforum.com/forum-rule...rum-rules.html



(I have added them for you today. Please take a few minutes to read all Forum Rules and comply in the future.)