New to Apple

[treypick]

Greetings to All,
I have been a PC user for many years but recently purchased a MacBook Pro. Windows 365 was installed to make use of Excel using VBA.

Developer and macros are enabled.

After much effort I am unable to run the seemingly simple ensuing macro. The document that I am trying to save has an extension of xlsx.

Any help will be greatly appreciated.
Trey

Sub MultipleLocations()
Dim OriginalName As String
OriginalName = ActiveDocument.FullName
ActiveDocument.SaveAs “ExtDr/Officetips/“ + ActiveDocument.Name
ActiveDocument.SaveAs “Users/Me/Documents/Officetest/“ + ActiveDocument.FullName
ActiveDocument.SaveAsOriginalName
End Sub

 

[Raz0rEdge]

You mean "Office 365". OK, and what happens when that macro is run?

 

[MacInWin]

I'm not an expert, but the file names don't look right. For example, these two lines:

ActiveDocument.SaveAs “ExtDr/Officetips/“ + ActiveDocument.Name
ActiveDocument.SaveAs “Users/Me/Documents/Officetest/“ + ActiveDocument.FullName

don't have path names that work. Neither has a full path name for where to put the document. And the "Users/Me" is only accurate if there is an account named "Me" and you have access to that account. But, as Ashwin has asked, what errors are you getting?