Vba 在excel中将三种不同颜色的日期列从一个工作簿复制到另一个工作簿

我正在尝试使用Vlookup将日期列中的条目从一个工作簿转移到另一个工作簿。我可以只传送单元格中的数据，而不是颜色编码。是否可以将每个单元格的颜色代码与数据一起传输

---

我有三种不同的颜色：红色、绿色和黄色，分别对应于不完整、完整和正在加工。在传输单元格颜色编码后，如果该过程完成，我应该能够手动更改它。

这里有一个代码，如果列中有匹配项，它将复制颜色。如果您已经有了要检查的列表，那么不要使用vlooup，因为这似乎有点毫无意义。如果没有匹配，它将保持默认颜色

Dim i As Integer
Dim a As Range

For i = 1 To WorksheetFunction.CountA(Columns("C"))
    On Error GoTo NextOne
    Set a = Cells(WorksheetFunction.Match(Range("C" & i), Range("B1:B6"), 0), "B")
    Range("C" & i).Interior.Color = a.Interior.Color

NextOne:
    Resume nextOne2
nextOne2:
Next i

---

您需要参考要使用的工作簿。你需要查阅如何参考工作手册。并更改数据所在的列。

这可以在VBA中完成。您需要获得红色、绿色和黄色的色码。最简单的方法是RGB值。然后循环检查该列的颜色是否与RGB匹配，以及他们是否将值和颜色复制到另一列。谢谢Sam。我是初学者，我不知道如何做你所说的。我正在寻找一些样本代码或文件，这将有助于我在计算出来。如果你能得到我的RGB值的细胞，我可以写一些基本的代码，这将告诉你怎么做。要获得RGB值，请转到带有颜色的单元格。单击填充旁边的错误，单击更多颜色，然后单击客户。然后它应该显示RGB值，以及您正在使用的列和应该进入的列