EXCEL 用宏合并工作表，合并后的表只要一个表头的代码怎么做？ 以下是您修改过后的宏代码，运行正常，如下

Sub 合并() Dim i As Integer For i = 2 To Worksheets.Count Step 1 Worksheets(i).Range("1:" & Worksheets(i).[a65536].End(3).Row).Copy [a65536].End(3).Offset(1) NextEnd Sub
请高手指点～～～

晕哦 把 ("1:" & 的1改成2不就好了

你的这个宏只有一个肯定还少了语句！只有复制动作却没指明粘贴位置！ 你可以在运行宏时选择逐步运行宏（按F8键），然后一步步观察每个变量的变化！这样也就能发现问题了

用sql语句,即可

select * from [sheet1$] union select * from [sheet2$]