Excel 在列中查找两个匹配项并设置文本格式

Excel 在列中查找两个匹配项并设置文本格式,excel,excel-2010,vba,Excel,Excel 2010,Vba,EXCEL 2010 VBA代码请求 我有一个工作簿,它有多个工作表,每个工作表中都有相似的数据。第一个单元格(A1)包含每张工作表的标题以及需要捕获的一组信息(G4:K?)(范围为32-65行)。标题和分组数据都将复制并粘贴(仅限值)到单独的“摘要”表中。工作簿中的所有工作表都会发生这种情况。我有这个代码,它是有效的。 好吧,这就是我被困的地方: 在A列中,我需要每个标题的第一个实例为黄色背景和红色粗体文本。 然后,同一标题的下一个实例(第二个)为黄色背景,黑色粗体文本。请参阅下面的照片链接

EXCEL 2010 VBA代码请求

我有一个工作簿,它有多个工作表,每个工作表中都有相似的数据。第一个单元格(A1)包含每张工作表的标题以及需要捕获的一组信息(G4:K?)(范围为32-65行)。标题和分组数据都将复制并粘贴(仅限值)到单独的“摘要”表中。工作簿中的所有工作表都会发生这种情况。我有这个代码,它是有效的。 好吧,这就是我被困的地方:

在A列中,我需要每个标题的第一个实例为黄色背景和红色粗体文本。 然后,同一标题的下一个实例(第二个)为黄色背景,黑色粗体文本。请参阅下面的照片链接

我认为这可以通过数组来实现,但我对数组的了解还不够。现在,这一切都是手工完成的(不好!!!)


每次更新工作表时(无论是通过过滤还是数据输入更改),都需要更改此数据格式。

请选择相关列(假定为)主页>样式-条件格式,新规则。。。,使用公式确定要格式化的单元格,并格式化此公式为真的值:

=COUNTIF(A$1:A1,A1)=1
格式…,选择黄色填充,粗体,红色字体,确定,确定

然后对黄色/粗体/背面重复以下步骤:

=COUNTIF(A$1:A1,A1)=2

Pnuts,感谢您提供的简单解决方案!我还以为这会是一场艰苦的比赛呢!所以我尝试了条件格式,只要我的数据没有被过滤就行了。一旦我在上面放了一个滤镜,黄色的hi灯光就消失了(滤光了)。是否有一种方法可以基于过滤后的数据应用条件格式?再次感谢您的解决方案!谢谢你,普努斯。我的替代解决方案是启动非必要数据,以便条件过滤器显示正确的信息。我听说当工作表被激活时,代码会自动运行。我可以走那条路。再次感谢!!!