如何将条件格式单元格的颜色复制到另一个 Excel 文件

Question

在一张表上我有具有条件格式颜色的数据。

我想将其复制并粘贴到另一个文件中，我可以粘贴值、列宽等，但我无法从条件格式中粘贴颜色。

我研究了一下，建议将其粘贴到 Word 中，然后返回 Excel，但这会破坏我的 Excel 行和列格式。

怎么做？可能吗？

Answer 1

我想向您推荐两种可行的方法。一是非编程，二是编程（VBA 宏）。

非编程方法：

1. 打开两个工作簿。
2. 复制单元格原始工作簿的表，（从中复制条件格式）到目标工作簿的工作表。
3. 打开管理规则选择 条件格式。
4. 选择显示格式规则此工作表。
5. 对于每条规则，调整适用于匹配您需要的范围。
6. 点击量程按钮在右边 适用于。
7. 单击并拖动并选择从左上角单元格到右下角单元格。
8. 点击量程按钮返回条件规则管理器。
9. 点击好的或者申请得到结果。

编程方法：

1. 在源文件中按下Alt+F11打开 VB 编辑器。

2. 复制并粘贴此代码作为标准模块。

   Sub CopyFormat()
   Application.DisplayAlerts = False
   Dim wbSource As Workbook
   Set wbSource = Workbooks.Open(Filename:="source.xlsm", UpdateLinks:=3)
   wbSource.Sheets(1).Range("A1:H100").Copy
   Selection.PasteSpecial _ 
   Paste:=xlPasteValues
   Selection.PasteSpecial _ 
   xlPasteFormats
   
   wbSource.Close
   Application.DisplayAlerts = True
   End Sub
   

笔记：

1. 您可以根据需要编辑工作簿和工作表名称。
2. 根据需要调整复制范围的单元格引用。

Answer 2

如果您不需要条件格式的公式，如果您将其复制到 MS Word 并返回 Excel，则颜色也应该被复制。

Answer 3

我找到了解决这个问题的一个非常简单的方法。

1. 将您想要在其他位置复制的具有条件格式结果的单元格复制出来。

2. 以格式化 - RTF 格式粘贴到 OpenOffice Calc 电子表格（我使用的是版本 4.1.5）中。格式仍然存在，但 OpenOffice 显然放弃了最初创建格式的条件。

3. 现在只需复制并粘贴到 Excel 中。

4. 打开香槟。

这适用于长达数千行的 Excel 文件。

Answer 4

我的方法：复制到 Google 电子表格，复制单元格，然后将其粘贴回 Excel - 此复制颜色。