I am using the following VBA code for a workbook that saves the user's file to a network folder that all users have access to - I have confirmed with each user. This code works perfectly on my computer but the other users are getting the Method 'saveas' of object' _workbook' failed Run Time Error.

Also, all users have Excel 2010 and Excel 2007. I have scoured the internet and forums trying to find a solution that works to no avail. Thanks in advance for your help!

Sub SaveIt()

Dim strDSO As String, strTM As String

ThisWorkbook.Save
Application.DisplayAlerts = False
'*****************
With Worksheets(1)
strDSO = .Range("C9")
strTM = .Range("D9")
End With

Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:="\\stlusregnt1\Regional\East Region\RNDAP Report\" & " RNDAP Report - " & strDSO & " - " & strTM & ".xlsm", FileFormat:=52

End Sub