Check Out - RefreshAll - Check In SharePoint files via Macro in VBA

See more:

VB

Hello,
I am just learning how to write macro's in VB. I have 14 files posted to a SharePoint and I need to write a macro that will check out each file, refresh the file (there is a refreshall macro in each file) then check the file back in for all 14 files. I keep receiving a run-time error 9: invalid call procedure or argument when I try to run the below macro.
Any help would be greatly appreciated.
Thanks,

Sub openFile()

Workbooks.Open Filename:= _
  "URL"
Worksheets("").Activate 'Destination sheet
'code to prepare print area etc

If Workbooks.CanCheckOut("") = True Then
    ActiveWorkbook.CheckOut
Else
        'code to handle error and close destination workbook
Application.Run "FY14 CR CAM Qualified Opportunity Report!refreshall"
End If
If ActiveWorkbook.CanCheckIn = True Then
    ActiveWorkbook.CheckIn
    ActiveWorkbook.Close
    MsgBox "The file has been checked in."
End If
End Sub