[已解决]关于End(xlUp)最后一行有文字的问题

qjsu · 发表于 2013-6-3 21:32

Worksheets(Y).Range("A1").CurrentRegion.Copy Worksheets("汇总表").Range("A65536").End(xlUp)

复制黏贴的时候应该是从end（xlup）的下一行开始，因为end（xlup）有文字，请问改如何解决啊？

最佳答案

hwc2ycy

2013-6-3 21:37

Worksheets(Y).Range("A1").CurrentRegion.Copy Worksheets("汇总表").Range("A65536").End(xlUp).offset(1)

hwc2ycy · 发表于 2013-6-3 21:36

再加上.offset(1)嘛。

hwc2ycy · 发表于 2013-6-3 21:37

Worksheets(Y).Range("A1").CurrentRegion.Copy Worksheets("汇总表").Range("A65536").End(xlUp).offset(1)

ligh1298 · 发表于 2013-6-3 21:37

Worksheets(Y).Range("A1").CurrentRegion.Copy Worksheets("汇总表").cells([A65536].End(xlUp).row+1,1)

		自动登录	找回密码
密码			注册