使用 VBA 将条件格式从一个单元格复制到另一个单元格？答案

【问题标题】：Copy conditional formatting from one cell to another using VBA?使用 VBA 将条件格式从一个单元格复制到另一个单元格？
【发布时间】：2015-02-07 22:44:24
【问题描述】：

我可以使用 VBA 将条件格式从一个单元格复制到另一个单元格吗？

我在想象这样的事情：

Sheets("A").Range("A1:A10").ConditionalFormatting = Sheets("B").Range("B1").ConditionalFormatting

【问题讨论】：

没有条件格式的特定粘贴选项，但是有一个合并，所以只要目标单元格对源单元格没有唯一的条件格式，那么您可以使用复制和粘贴特殊类型为“xlPasteAllMergingConditionalFormats”
我打算建议你使用FormatConditions.ModifiesApplyToRange 方法。不过，这只有在条件格式在同一张纸上时才有效。

标签： vba excel

【解决方案1】：

使用这个：

Sub test()
     Sheets("B").[B1].Copy: Sheets("A").[A1:A10].PasteSpecial xlPasteFormats
End Sub

【讨论】：