先自定义一个函数sumcolor,再用它来统计。第一步,编写sumcolor,把下面的代码复制到EXCEL的一个代码模块中。代码:FunctionSumColor(sumrangeAsRange,colAsRange)DimrngAsRangeForEachrngInsumrangeIf...
1、在电脑中的wps中打开需要操作的Excel表格,如下图所示。2、在表格中需要统计数字的单元格中输入SUBTOTAL函数,格式为“=SUBTOTAL(函数序列号103,开始统计位置:统计截止位置)”如下图所示。3、点击回车后就可以看到目前...
方法一,用宏自定义一个函数:同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:Functionsumcolor(rng1AsRange,rng2AsRange)AsSingleDimcellAsRangesumcolor=0ForEachcellInrng1I...
8、弹出【函数参数】对话框:在第一个参数后面选择C2:C7单元格区域,按F4键绝对引用该区域;在第二个参数后面输入[SUMCOLOR];在第三个参数后面选择B2:B7单元格区域,按F4键绝对引用该区域。所有参数设置好后点击【确定】...
SUMColor”函数,按下alt+F11,插入模块写下过程FunctionSUMColor(rag1AsRange,rag2AsRange)Application.VolatileForEachiInrag2Ifi.Interior.ColorIndex=rag1.Interior.ColorIndexThenSUMColor=SUMColor...
用宏自定义一个函数就可以解决,只是不太好理解。同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:FunctionSumColor(xRngCondAsRange,xCondAsRange,xSumAsRange)DimiAsIntegerFori=1To...
当然也可以用宏自定义函数:同时按Alt和F11进入宏界面,点菜单的插入,模块,粘贴如下代码:Functionsumcolor(rng1AsRange,rng2AsRange)AsSingleDimcellAsRangesumcolor=0ForEachcellInrng1Ifcell....
FunctionSumColor(colAsRange,sumrangeAsRange)AsIntegerDimicellAsRangeApplication.VolatileForEachicellInsumrangeIficell.Interior.ColorIndex=col.Interior.ColorIndexThenSumColor=...
1、电脑打开Excel表格。2、电脑打开Excel表格后,Alt+F11进入宏,然后点击插入模块。3、点击插入模块后,输入代码:FunctionSUMColor(rag1AsRange,rag2AsRange)Application.VolatileForEachiInrag2Ifi....
如题,我想知道:EXCEL如何把有颜色的单元格数据求和?