既然是问VBA中实现,那么就讲VBA的事了 如你的年龄一列在F列,那么用循环直接计算出结果 for x=2 to 100 if cells(x,6)<20 then range("H2")=range("H2")+1 elseif cells(x,6)<26 then range("H3")=range("H3")+1 elseif cells(x,6)<30 then range("H4")=range("H4")+1 else range("H5")=range("H5")+1 next x 这样H2到H5分别是20以下人数,20到25人数,26到30人数,30以上人数本回答被提问者采纳