在Excel VBA中将被调用单元格中的条件格式应用到另一个工作表中

在Excel VBA中将被调用单元格中的条件格式应用到另一个工作表中,vba,excel,conditional-formatting,Vba,Excel,Conditional Formatting,在VBA中,是否有一种方法可以根据另一个工作表中某个单元格的单元格格式设置工作簿一个工作表中每个单元格的格式 在我的一张工作表中,我有一个条件格式,可以根据公式更改单元格的颜色。我想使用VBA将单元格的颜色复制到单独工作表的单元格中。我尝试使用Format Painter,但它复制了条件格式的等式,而我只需要单元格的颜色 有什么想法吗?粘贴特殊格式 复制整个工作表的格式 Sheets("Sheet1").Cells.Copy Sheets("Sheet2").Cells.PasteSpecia

在VBA中,是否有一种方法可以根据另一个工作表中某个单元格的单元格格式设置工作簿一个工作表中每个单元格的格式

在我的一张工作表中,我有一个条件格式,可以根据公式更改单元格的颜色。我想使用VBA将单元格的颜色复制到单独工作表的单元格中。我尝试使用Format Painter,但它复制了条件格式的等式,而我只需要单元格的颜色

有什么想法吗?

粘贴特殊格式

复制整个工作表的格式

Sheets("Sheet1").Cells.Copy
Sheets("Sheet2").Cells.PasteSpecial Paste:=xlPasteFormats
Sheets("Sheet1").Range("A1").Copy
Sheets("Sheet2").Range("A1").PasteSpecial Paste:=xlPasteFormats
复制范围的格式

Sheets("Sheet1").Cells.Copy
Sheets("Sheet2").Cells.PasteSpecial Paste:=xlPasteFormats
Sheets("Sheet1").Range("A1").Copy
Sheets("Sheet2").Range("A1").PasteSpecial Paste:=xlPasteFormats