Итак, я пробовал поискать net и форумы, чтобы решить эту проблему, но поскольку я вообще не могу этого понять, мне нужен совет.
У меня есть макрос, который Раньше я запускал Excel 2011 на Ma c, которого у меня больше нет. Когда я пытаюсь запустить это в Excel 2016 на Ma c, я получаю ошибку времени выполнения «1004». К сожалению, мы не смогли найти (расположение файла). Возможно ли, что он был перемещен, переименован в et c error.
Код приведен ниже
On Error Resume Next
MyPath = MacScript("return (path to documents folder) as String")
MyScript = _
"set applescript's text item delimiters to "","" " & vbNewLine & _
"set theFiles to (choose file of type " & _
" {""com.microsoft.Excel.xls""} " & _
"with prompt ""Please select a file or files"" default location alias """ & _
MyPath & """ multiple selections allowed true) as string" & vbNewLine & _
"set applescript's text item delimiters to """" " & vbNewLine & _
"return theFiles"
MyFiles = MacScript(MyScript)
On Error GoTo 0
If MyFiles <> "" Then
With Application
.ScreenUpdating = False
.EnableEvents = False
End With
MySplit = Split(MyFiles, ",")
For N = LBound(MySplit) To UBound(MySplit)
X = ActiveWorkbook.Name
Workbooks.Open (MySplit(N))
Когда я вижу отладку, она останавливается на коде Workbooks.Open ( MySplit (N))
Файл, который он ищет, существует в этом месте, потому что я должен выбрать файл, когда он мне предложит
Интересно, есть ли кто-нибудь, кто может мне помочь в выборе кода для замены Спасибо ты