Question

我有一张支票，例如

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

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

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

如何复制单元格，其值和格式？

这可以在一个公式中完成，还是我可以写的VBA中有什么可以做到这一点

Answer 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

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

1 个答案:

VBA代码：