当Excel中的条件格式合并为Mac时粘贴特殊问题
我有一个简单的macros将单元格复制到另一个单元格,合并条件格式:
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中执行macros时,出现此错误:
运行时错误“1004”:
对象'Range'的方法'PasteSpecial'失败
同样的macros在Excel for Windows中完美工作。
如果我使用xlPasteAll
而不是xlPasteAll
来更改XlPasteType
选项,则macros将被执行而不会出错。
你可能没有所有的Mac的VBA的枚举和属性,所以你可以直接replace它的值。
这里用14replacexlPasteAllMergingConditionalFormats
。
因为对象浏览器(VBE中的F2)说:
Const xlPasteAllMergingConditionalFormats = 14