求大神帮忙合并表格

she8088

想把1月-12月数据合并到最后一个汇总表，从第3行开始合并 ，12月后面3张表不要汇总。谢谢大神

dgerwin

http://club.excelhome.net/thread-1455229-1-1.html

she8088

Sub 合并工作表()
Application.ScreenUpdating = False
x = 1
For j = 2 To Sheets.Count
   If Sheets(j).Name <> ActiveSheet.Name Then
        s = IIf(j = 2, 0, 2)
        Sheets(j).UsedRange.Offset(s).Copy Cells(x, 1)
        x = Range("A65536").End(xlUp).Row + 1
    End If
Next
End Sub

能稍微解释下
s = IIf(j = 2, 0, 2)是什么意思吗

she8088

dgerwin 发表于 2020-4-13 22:39
http://club.excelhome.net/thread-1455229-1-1.html

谢谢大神，能帮忙改下嘛？这个表格和以前的不一样，那个命令用不了。