ﾌｨﾙﾀで､見えなくするだけじゃ駄目ですか？

ｵｰﾄﾌｨﾙﾀを設定して､A列に対して｢指定の値に等しくない｣で "*集計" を指定する｡

手作業ですがw

C列のC2ｾﾙから1から順番に番号を入れる(最初に1,2といれて2ｾﾙ選択しALTを押しながらｾﾙの右下隅を下に最終行まで伸ばす)
D列のD2ｾﾙに =FIND("集計",A2) と入れる
D2ｾﾙをCNTL-DでD列最終行までｺﾋﾟｰ
D列に #VALUE! が出ていても気にせず､A?D列を先頭行ﾀｲﾄﾙ行指定の並べ替えでD列の値で昇順ｿｰﾄ
D列に数字の入っている行をまとめて消す｡
D列を消す｡
A?D列を先頭行ﾀｲﾄﾙ行指定の並べ替えでC列の値で昇順ｿｰﾄ｡
C列を消す｡
で無くなるはず｡