如何把多张工作表内容快速复制到一张表我有一份老师工资表,一个工作簿里有好多张工作表的,现在我想把各工作表里的内容全部合到一张表中,除了用复制粘贴的方法外,请问还能有什么好的方法快速合到一起吗?(首选)Sub yy()'声明过程名称为“yy”。当要声明一个过程时,通常是以关键字“SUB"开头,并且以关键字“END”结束,在 SUB 关键字之前是用来指定此过程的作用域,例如 public,static, 或protected 等。在 SUB 关键字之后为过程最重要的三大部分:过程名称、参数以及在 SUB 和 END SUB 之间的主体程序代码内容。过程是可以执行的语句序列单元,所有可执行的代码必须包含在某个过程中,任何过程都不能嵌套在其它过程中,过程的名称必须在模块级别进行定义。Sheets。Add after:=Sheets(Sheets。Count)’新建一个工作表放在最后.参数值和参数名之间应该使用“:=”符号,而不是等号。在代码中,属性和方法都是通过连接符“。”来和对象连接的。Add 是方法名,after 是自变量,方法名与自变量之间用半角空格隔开。For i = 1 To Sheets。Count — 1’从第一个工作表到倒数第二个工作表With Sheets(i)’with 语句可以在一个单一对象或一个用户定义类型上执行一系列的语句.使用 with 语句不仅可以简化程序代码,而且可以提高代码的运行效率. With/end with 语句结构中以“。”开头的语句相当于引用了 with 语句中指定的对象。当程序一旦进入 with/end with 结构,with 语句指定的对象就不能改变。因此不能用 with 语句来设置多个不同的对象.n = 。[c65536].End(xlUp).Row'求出 c 列最大行号。求出某列最大行号的目的是确定有数据区域的最下边界,为此,选择求最大行号列时,选择的列数据最下边界要最大限度包含所有的数据。End 和 Row 都是属性,此语句取得属性值后赋值给变量 n。此程序事先没有对变量进行声明。在程序中取得对象的属性的代码结构:变量=对象·属性。。Range("a2:V"&n).Copy ActiveSheet.[c65536]。End(xlUp)。Offset(1, -2)’取 a2 开始到最后的数据 copy到新表数据的下一行。n =.[c65536]。End(xlUp) .Row 得到 C 列最后一个非空单元格所在的行号,“。Offset(1, —2)”偏移“[c65536]。End(xlUp)"得到单元格的位置开始复制后数据的粘贴位置。由 C列移到 A 列。[c65536]。End(xlUp):求出 C 列最下边有数据的单元格,粘贴复制的数据时为了前面的数...