vba - VBA - 按字体颜色拆分单元格值

Question

我得到了一个包含一系列单元格的电子表格，每个单元格都包含一个数字列表。

每个数字都被赋予了一种字体颜色，因此在一个单元格中，您可能有两个橙色数字，一个红色数字和一个绿色数字。我需要区别对待每种颜色；例如，我可以按原样计算绿色和红色数字，但我需要先查看每个橙色数字是否出现在该范围内的先前单元格中，然后再计算它。

编号列表以逗号分隔，因此获取单个编号应该不是问题，但是如何保留和使用颜色信息？

我会发布代码，但坦率地说，我不确定从哪里开始。

提前致谢！

Answer 1

使用此解决：

http://www.mrexcel.com/forum/excel-questions/656265-excel-visual-basic-applications-count-items-cell-color-font.html

本质上是一个循环，它使用 InStr 在字符串中查找逗号（在本例中为单元格的内容），然后查看逗号后面的下一个字符的颜色。我刚刚编辑它说如果 ColorIndex = 46，则将后续字符复制到数组中的空格中。然后我可以查看数组中的每个项目，并将其与范围内的其他单元格进行比较，看看它是否出现在其他地方。