Ошибка VBA Runtime 70 под Mac Office 2015

Question

Привет, ребята, у меня есть этот простой скрипт, где я применяю шаблон диаграммы на 2 диаграммах в своей таблице. Очевидно, что это отлично работает в Windows 10, Mac Office 2011, но не в Mac Office 2015.

Im gettin the error, Runtime Error 70 - Permission Denied Оба файла находятся в одной и той же папке, а имена указаны правильно.

Sub Makro_Setup() 
' 
' Makro_Setup Makro 
    ' 
' Tastenkombination: Strg+Umschalt+B 
' 
Worksheets("Auswertung").Activate 

Dim path As String 
Dim TheOS As String 

TheOS = Application.OperatingSystem 

If MAC_OFFICE_VERSION >= 15 Then 
MsgBox "Not Good" 
Else 
MsgBox "Good" 
End If 

path = ActiveWorkbook.path + "/Diagramm1.crtx" 

MsgBox TheOS 
MsgBox path 

ActiveSheet.ChartObjects("Diagramm 2").Activate 
ActiveChart.PlotArea.Select 

' Here comes the error 70 -START 
ActiveChart.ApplyChartTemplate path 
' Here comes the error 70 -END 

ActiveSheet.ChartObjects("Diagramm 5").Activate 
ActiveChart.PlotArea.Select 
ActiveChart.ApplyChartTemplate path 

End Sub 

Может быть, кто-то может помочь мне с этим :(

Ps .: путь IST правильно:/Users/....

С наилучшими пожеланиями Мачете

Answer 1

Ok наконец я нашел решение проблемы с Mac office 2016. Проблема заключается в том, что в новой версии вы не можете получить доступ к файлам по умолчанию. Поэтому добавлено следующее в мой код:

Simpy эта тема мне очень помогла: VB Macros for Office 2016 for Mac require Permissions every time they try to access a file! Is there any way to get around this behavior?

С наилучшими пожеланиями Мачете

PS. необходимо снять защиту с листа!