'确认当前单元格最后一行有数据的是在哪一行
Lastrow = Cells(1000000, Startcolumn).End(xlUp).Row
'确认当前单元格最后一列有数据的是在哪一列
Lasrcolumn = Cells(3, Columns.count).End(xlToLeft).Column
'确认当前单元格最后一行有数据的是在哪一行
Lastrow = Cells(1000000, Startcolumn).End(xlUp).Row
'确认当前单元格最后一列有数据的是在哪一列
Lasrcolumn = Cells(3, Columns.count).End(xlToLeft).Column