(1)转置法选择“这一行”——复制——选择空列第2个单元格——选择性粘贴——转置。这样横向的就变成纵向的了,在2007以上版本中就能进行填充色筛选了。(这里如何筛选就不赘述了)。(2)自定义函数法=COUNTYS(A1:Q1)COUNTYS是自定义函数,其代码:Public Function COUNTYS(rag As Range) Dim n% For Each cel In rag If cel.Interior.ColorIndex <> xlNone Then n = n + 1 Next cel COUNTYS = nEnd Function说明:1)当求数区域填充色改变后,函数的值不会跟着变化,需要重新输入一下。2)函数适用于你说的“想知道横向这一行有几个单元格是有颜色填充的”,不适用于“想知道横向这一行有几个单元格是某种颜色填充的”。3)第1个图中,第10行于第11行看似一样,结果却不同,这是因为第10行有填充色(白色),而第11行无填充色的缘故。