Tìm và di chuyển đến dòng trắng

[tigergrey]

Làm ntn để chuyển từ sheet1 sang đến dòng trắng (chưa có data) sheet2
Lần 1: dòng 1000 of sheet 2 (dòng 1000 là dòng trắng) sau khi nhập liệu 500dòng trở về sheet 1.(có sự thay đổi vị trí of chuột)
Lần 2: thì dòng 1101 of sheet 2 sẽ là dòng trắng, chuột sẽ ở đây để nhập liệu lần 2
(thực ra với nhiều bản ghi thì đây là giải pháp giảm tgian tối ưu?)
For Code VBA. Thanks!

 

[ndu96081631]

Làm ntn để chuyển từ sheet1 sang đến dòng trắng (chưa có data) sheet2
Lần 1: dòng 1000 of sheet 2 (dòng 1000 là dòng trắng) sau khi nhập liệu 500dòng trở về sheet 1.(có sự thay đổi vị trí of chuột)
Lần 2: thì dòng 1101 of sheet 2 sẽ là dòng trắng, chuột sẽ ở đây để nhập liệu lần 2
(thực ra với nhiều bản ghi thì đây là giải pháp giảm tgian tối ưu?)
For Code VBA. Thanks!

Cách chung để di chuyển đến dưới cell cuối cùng có dử liệu là:
Cells(65536, x).End(xlUp).Offset(1).Select
Với x là chỉ số cột
Tuy nhiên, đọc diển giải của bạn tôi sắp bị "chập dây" rồi ---> Dường như là hiểu hiểu... mà dường như lại không hiểu gì