
详见样表截图
D2输入 =INDEX($B:$B,SMALL(IF($A$2:$A$100=D$1,ROW($2:$100),6^6),ROW(A1)))&""
同时按下CTRL+SHIFT+Enter三键,使数组公式出现{ },公式右拉再下拉到空值
你这个问题用VBA比较简单,基本方法的话,要用辅助列,假设你的原数据在A列和B列,则:
1 在C1中输入公式:
=IF((A1<>"")(A2<>""),B1,IF((A2<>"")(A1=""),B1,C2+B1))
2 向下拖拉复制公式到B列有数据的最后一行,填充公式。
3 然后选择A列所有有数据区,工具栏中点格式刷后,再点击C1,将A列的合并单元格格式复制到C列。
4 复制C列,在B列中选择性粘贴为数值,最后删除C列。
B1中输入:“=SUM(A1:A9)”B10中输入:“=SUM(A10:A17)”
B18中输入:“=SUM(A18:A23)”
等等。。类推。
合并单元格没有影响,或重新合并单元格。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)