怎么可以把多个sheet复制粘贴到一个sheet里

显示全部楼层 · 2012-7-19 15:31:09

工作表标签单击右键,查看代码在VBE代码窗口粘贴下面的代码回到工作表,按ALT+F8,运行这个宏就可以把所有工作表已经有数据的单元格区域复制到一个新建的工作表中新建的工作表,在最后一个工作表位置汇总后,自己筛选多余的标题行删除就OK了 sub ttdim sh as worksheetset sh =sheets(sheets.count)for i = 1 to sheets.count-1sheets(i).usedrange.copy sh.range("A" & sh.range("A65536").end(xlup).row+1)nextend sub...

千问 · 2012-7-19 15:31:09

好办法我这木有，笨办法倒是有一个：Ctrl+a ,Ctrl+c, Ctrl+v，三个键搞定，你一个Excel表格有多少sheet，20个有木有，只用重复20次就行了，二分钟就搞定的事，如果你要设计公式，十分钟都一定搞的定这个公司的编写…………...