Chỉ xóa dòng dưới tiêu đề

[Thanhhoai00]

Mình có đoạn code xóa dòng cuối trong sheet Lop1 như sau ạ !!!
Tiêu đề
Dòng 1 chứa dữ liệu
Dòng 2 chứa dữ liệu
.............
Dòng n dữ liệu
Nhưng mỗi lần xóa liên tục là code xóa luôn dòng tiêu đề, mình thêm code thế nào để không cho xóa dòng tiêu đề ạ !!
Chỉ cho xóa dòng dưới tiêu đề !!! Tiêu đề không được xóa
Cảm ơn các bạn !!!

 

[phulien1902]

Mình có đoạn code xóa dòng cuối trong sheet Lop1 như sau ạ !!!
Tiêu đề
Dòng 1 chứa dữ liệu
Dòng 2 chứa dữ liệu
.............
Dòng n dữ liệu
Nhưng mỗi lần xóa liên tục là code xóa luôn dòng tiêu đề, mình thêm code thế nào để không cho xóa dòng tiêu đề ạ !!
Chỉ cho xóa dòng dưới tiêu đề !!! Tiêu đề không được xóa
Cảm ơn các bạn !!!

Bạn thử thêm dòng này xem"

If LastRow > 1 Then

 

[Phuocam]

Nhưng mỗi lần xóa liên tục là code xóa luôn dòng tiêu đề,

Hoặc thử code này:

Private Sub CommandButton1_Click()
Worksheets("Lop1").UsedRange.Offset(1).Clear
End Sub