excel多张表头相同,合并到一张表中:
Sub 工作表合并()
For Each st In Worksheets
If st.Name <> ActiveSheet.Name Then
st.UsedRange.Offset(1, 0).Copy [a65536].End(xlUp).Offset(1, 0)
End If
Next
End Sub
excel多张表头相同,合并到一张表中:
最新推荐文章于 2024-08-24 10:04:35 发布
excel多张表头相同,合并到一张表中:
Sub 工作表合并()
For Each st In Worksheets
If st.Name <> ActiveSheet.Name Then
st.UsedRange.Offset(1, 0).Copy [a65536].End(xlUp).Offset(1, 0)
End If
Next
End Sub