Cách tìm dòng cuối để nhập liệu

[tuan.dandy]

Các bác cho em hỏi em mới tìm hiểu về VBA và chưa hiểu ở đoạn code này
Private Sub btnAdd_Click()
Dim End_A As Long
End_A = Sheet1.Range("A1000").End(xlUp).Row + 1
With Sheet1
_______
như bên trên là đang tham chiếu ở phạm vi Sheet1
Nhưng em muốn nói đến tất cả các Sheet thì sẽ dùng như nào, mong các bác chỉ dẫn
Em cảm ơn!

 

[befaint]

đến tất cả các Sheet

Thì xóa Sheet1. đi nhưng tiêu đề vi phạm nội quy ci mi ni rồi!!!!!!

 

[tuan.dandy]

Thì xóa Sheet1. đi nhưng tiêu đề vi phạm nội quy ci mi ni rồi!!!!!!

Xoá sheet1 đi ạ. Liệu có chạy dk k

 

[hhoang_56]

Xoá sheet1 đi ạ. Liệu có chạy dk k

Muốn biết có chạy được hay không thì cứ chạy macro thì biết

 

[be_09]

Các bác cho em hỏi em mới tìm hiểu về VBA và chưa hiểu ở đoạn code này
Private Sub btnAdd_Click()
Dim End_A As Long
End_A = Sheet1.Range("A1000").End(xlUp).Row + 1
With Sheet1
_______
như bên trên là đang tham chiếu ở phạm vi Sheet1
Nhưng em muốn nói đến tất cả các Sheet thì sẽ dùng như nào, mong các bác chỉ dẫn
Em cảm ơn!

Góp ý cho bạn:
1/ Tiêu đề bài viết của bạn vi phạm nội quy tại khoản 2, mục III.
2/ Nên sửa tiêu đề là: Cách tìm dòng cuối để nhập liệu. Cách sửa lại tiêu đề bài viết:
Khi đăng nhập xong, vào Công cụ chủ đề (trên cùng bên phải bài viết), chọn Edit Title , nó hiện ra hộp thoại để sửa tiêu đề, khi sửa xong nhấn nút Lưu thay đổi.