作者: soyoso (我是耀宗) 2018-08-13 13:24:00
如以档案内要保留储存格填满颜色的话,可先将a4:c11范围range.copy到储存格f4,清除u5以下资料,不要清除格式接着移除重复range.removeduplicates,保留a、b栏的唯一值现金流以工作表函数sumifs,看要以循环来加总写入或以储存格h5内先写入公式再以复制该储存格,以range.pastespecial贴上公式;可不动到储存格的填满颜色
作者: soyoso (我是耀宗) 2018-08-13 15:22:00
先暂存在其他储存格(如f4:h4)内唯一值,加总,最后清除原本位于a:c的表格,再剪下贴上如果不想以其他储存格为暂存,直接于a4:c11内执行的话先循环判断唯一值,工作表函数countifs或scripting.dictionary等;sumifs加总,暂存于变量(阵列、字串[需分割])如保留储存格填满颜色的话,清除c4以下资料,但不要清除格式,接着移除重复range.removeduplicates,保留a、b栏的唯一值。最后循环将加总的资料写入现金流或范围=阵列变量(需工作表函数转置)