Foutmelding Get SaveAsFilename en Get OpenFilename

Ik werk zelf met Windows. Als iemand met een Mac een macro uitvoert met Get SaveAsFilename of Get OpenFilename verschijnt er een foutcode. In Windows gaan die macro's perfect.

Macro save file:

' Vraag waar het nieuwe bestand moet worden opgeslagen

filePath = Application.GetSaveAsFilename( _

    InitialFileName:="", _

    FileFilter:="Excel-werkmap (*.xlsx), *.xlsx")

' Sla het nieuwe bestand op en sluit het



    newWB.SaveAs Filename:=filePath, FileFormat:=xlOpenXMLWorkbook, Password:="YourPassword"

    newWB.Close False

In Windows gaat dit goed. Op een Mac: Runtime error '1004'

Method 'GetSaveAsFileName of Object '_Application' failed

Macro Open file:

   sFullPath = Application.GetOpenFilename(FileFilter:="Excel Files (*.xlsx),*.xlsx", _

                      Title:="Selecteer het te importeren bestand")

   Workbooks.Open Filename:=sFullPath

In Windows gaat dit goed. Op een Mac: Runtime error '1004'

Method 'GetOpenFileName of Object '_Application' failed