VBA macro works on one computer but when other use it, it attempts to save to the wrong save path and runtime errors

[ZMathis]

Hello,

I have a Macro that un-shares the workbook then re-shares it after the macro has run. It works for me and when re-sharing it, it saves to the correct file path given in the vba. But when others in the office try it, it adds 7 or 8 random numbers at the end of the save address, then Runtime Error 1004s. I was thinking it might have something to do with the enabling content because someone suggested having them manually save after enabling content to unflag themselves as non-enabled in the system, but, while it did run the macro up to the last line (the re-sharing part) where it hadn't been doing before (before it would give the same error but all the macro accomplished before erroring out was un-sharing it), it still is giving that runtime error. When I hit the debug, it highlights the line below, with the correct save file path.

ActiveWorkbook.SaveAs "x:\example\filename.xlsm", , , , , , xlShared

But the Runtime Error 1004 is stating that the file path doesn't exist "x:\example\filename\0342242", the numbers are different every time.

Thank you in advance for any guidance.

 

[Alex Blakenburg]

Just curious, are you actually wanting to save it to a different name to what it was originally ?
If not would what is in this post work (modified for my post #9)
Share/Unshare Workbook
ie

ThisWorkbook.SaveAs ThisWorkbook.FullName, AccessMode:=xlShared

 

[ZMathis]

I think that actually worked! Thanks so much for the insight, I remember reading that post before when I was originally researching before writing the code. I guess it was something along the lines of how Excel was interacting with the networking path for the different users.

 

[Alex Blakenburg]

Thanks for letting us know. I will keep my fingers crossed it.