VBA 宏适用于 Windows 版 Excel 2016，但不适用于 mac

Question

我在 Excel 2016 上有一个宏，它非常适合创建 PDF。 但此宏仅适用于 Windows 版 Excel 2016。 我在适用于 Mac 的 Excel 2016（最新版本）上尝试了它，但它不起作用。

这是我的宏

Sub Macro1()

Dim Chemin As String
Dim texte As String

Chemin = ThisWorkbook.Path & "/"
texte = Range("C3")
Application.DisplayAlerts = False

ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, _
Filename:=Chemin & texte & ".pdf", _
Quality:=xlQualityMinimum, _
IncludeDocProperties:=True, _
IgnorePrintAreas:=False, _
OpenAfterPublish:=False

Cells(1, 3).Value = Cells(1, 3).Value + 1

End Sub

我进行了大量搜索，似乎“ExportAsFixedFormat Type:=xlTypePDF”在 Mac 的最新 Excel 版本上不起作用。 但我找不到任何其他方式。

Answer 1

我有同样的问题。

我在 Excel 2016 中用英语编写了代码（在安装了 Windows 的 HP 计算机上），然后我尝试在安装了法语的 Mac 上执行相同的 Excel 文件。 我注意到问题是语言。

例如问题代码：

Private Sub 
  Cancelbutton_Click()... 
End Sub

要执行它，它需要是：

Private Sub 
  Cancelbutton_Cliquer(...
End Sub

Answer 2

如果您想通过 Excel 在 MAC 上创建文件夹或创建文件，您需要使用：Scripting.FileSystemObject

Set fs = CreateObject("Scripting.FileSystemObject")