在 if 检查中复制值时如何复制条件格式？

【问题标题】：How to copy conditional formatting when copying value within if check?在 if 检查中复制值时如何复制条件格式？
【发布时间】：2014-08-12 05:34:59
【问题描述】：

我有一张支票，比如

=IF(A1="","",Sheet2!A1)

Sheet2!A1 包含条件格式的单元格（以特定颜色着色）

我想在我的新工作表上保留颜色

如何复制单元格、其值及其格式？

这可以在公式中完成吗，或者我可以在 VBA 中编写一些可以做到这一点的东西

【问题讨论】：

标签： excel vba excel-formula conditional-formatting

【解决方案1】：

Can this be accomplished within a formula?

AFAIK，我认为你不能使用 excel 公式来做到这一点

VBA 代码：

选择你有公式的单元格并运行宏

Sub ColorCopyCell()
If (IsEmpty(ActiveCell)) Then 'If empty
Worksheets(2).Range(ActiveCell.Address).Copy
Selection.PasteSpecial Paste:=xlPasteAll
End If
End Sub

【讨论】：