在Excel for Mac中合并条件格式时粘贴特殊问题

时间:2015-11-12 14:04:23

标签: excel vba excel-vba excel-vba-mac excel-2016

我有一个简单的宏,它将一个单元格复制到另一个单元格中,合并条件格式:

Sub test()

   Range("A2").Copy

   Range("A3").PasteSpecial Paste:=xlPasteAllMergingConditionalFormats, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

End Sub

A2的内容为1,条件规则仅为=ISODD($A2)。 当我在Excel 2016 Mac中执行宏时出现此错误:

  

运行时错误'1004':
  对象'Range'的方法'PasteSpecial'失败

相同的宏在Excel for Windows中完美运行。

如果我使用XlPasteType而非xlPasteAll更改xlPasteAllMergingConditionalFormats选项,则会毫无错误地执行宏。

1 个答案:

答案 0 :(得分:2)

您可能没有VBA for Mac中的所有枚举和属性,因此您可以直接将其替换为其值。

此处将xlPasteAllMergingConditionalFormats替换为 14

因为对象浏览器(VBE中的F2)说:

Const xlPasteAllMergingConditionalFormats = 14