Excel Home
全球知名的Excel资源网站之一

将第1张表中已使用的区域复制到第2张工作表中

本文为《别怕,Excel VBA其实很简单(第3版)》随书问题参考答案

如果在活动工作簿的第 1 张工作表中,保存了行、列数不确定的数据,现要将这些数据复制到第 2 张工作表中(目标区域的最左上角单元格为A1),可以用下面的过程:

Sub 复制所有数据()
Worksheets(1).UsedRange.Copy Worksheets(2).Range("A1")
End Sub

如果第2 张工作表中已有数据,要将第1 张表中的数据复制到第2 张工作表的第 一行空行中,可以用下面的过程:

Sub 复制最后一行数据()
Worksheets(1).UsedRange.Rows(Worksheets(1).UsedRange.Rows.Count).Copy Worksheets(2).Range("A1048576").End(xlUp).Offset(1, 0)
End Sub

赞(61)
未经允许不得转载:ExcelHome » 将第1张表中已使用的区域复制到第2张工作表中
分享到

关于我们联系我们
本站特聘法律顾问:李志群律师   沪ICP备11019229号-2

沪公网安备 31011702000001号

征信