excel如何筛选后将某列数据合并

excel如何筛选后将某列数据合并比如下面的图，当我筛选"2"的数据时，我想把D列的数据合并到一个格里，然后删除其他行效果如3图

补充一下，一个两个数据，手工操作，我也知道怎么弄，如果上百条，上千条这样的数据，手动操作，要累死人的。。。 有没有更好的自动化的方式

1、在C1中输入“=A1&B1”，按回车键，C1列的内容就是A1、B1两列的和了。
2、选中C1单元格，用鼠标指向单元格右下角，当光标变成"＋"后，按住鼠标拖动光标向下拖到要合并的结尾行处，就完成了A列和B列的合并。
3、最后，先要把C列的结果复制一下，再用“选择性粘贴”命令，将数据粘贴C列上,再删掉A、B、列的数据即可。

筛选后求和的公式是 =subtotal(9,b2:b99) 对ab列进行筛选，筛选a列的“a”，并求和的代码如下： sub xxx() activesheet.range("$a$1:$b$999").autofilter field:=1, criteria1:="a" dim xrng as range set xrng = range("b2:b999") msgbox worksheetfunction.subtotal(9, xrng) end sub