利用宏合并一个工作薄下的多张表格方法
利用宏合并文档需要保证格式一致性
宏代码:
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
Rows(“2:1048576”).Clear
Dim xrow As Integer, sht As Worksheet, rng As Range
For Each sht In Worksheets
If sh...
原创
2019-11-23 19:46:17 ·
3085 阅读 ·
0 评论