最快速的方法就是復(fù)制粘貼,把所有表的內(nèi)容復(fù)制、粘貼到一個(gè)新表中。 如果表的個(gè)數(shù)成千上萬(wàn),可以寫(xiě)VBA代碼來(lái)完成這個(gè)復(fù)制、粘貼的過(guò)程,下面是我寫(xiě)的代碼,可以ALT+F11之后粘貼使用: sub 宏1()dim i,n for i=2 to sheets.count n=sheets(1).usedrange.rows.count+1 sheets(i).usedrange.copy sheets(1).cells(n,1) next i end sub |
|