Lỗi "run-time error '9': Subscript out of range"

[JungSangAh]

Chào buổi tối cả nhà GPE.

Em có một file excel và bị lỗi như trên khi chạy lệnh "xóa".
Rất mong các anh chị tìm và sửa lỗi giúp em với ạ.
Em xin chân thành cảm ơn.

 

[befaint]

sửa

 

[SA_DQ]

Cái lệnh 'Xóa' xài để làm gì:
Xóa dữ liệu của 1 nhóm hàng (dòng)?
Xóa vài ô trong 1 dòng?
hay xóa nguyên dòng
Bạn xài câu lệnh

Sheet2.Range("B" & ActiveCell.Row & ":" & "F" & ActiveCell.Row).ClearContents

theo mình có vẻ bập bênh lắm.

Là mình thì sẽ fải chỉ định đó là dòng nào, tìm dòng đó bằng cách nào
& cũng quan trong nữa là: nếu không xóa nguyên dòng mà chỉ là vài ô trong dòng thì còn chuyện dữ liệu xung quanh vùng đã xóa sẽ bị đùn đẩy về fía nào?

 

[JungSangAh]

Cảm ơn anh nhiều ah.

Bài đã được tự động gộp: 15/6/18

Cái lệnh 'Xóa' xài để làm gì:
Xóa dữ liệu của 1 nhóm hàng (dòng)?
Xóa vài ô trong 1 dòng?
hay xóa nguyên dòng
Bạn xài câu lệnh

Sheet2.Range("B" & ActiveCell.Row & ":" & "F" & ActiveCell.Row).ClearContents

theo mình có vẻ bập bênh lắm.

Là mình thì sẽ fải chỉ định đó là dòng nào, tìm dòng đó bằng cách nào
& cũng quan trong nữa là: nếu không xóa nguyên dòng mà chỉ là vài ô trong dòng thì còn chuyện dữ liệu xung quanh vùng đã xóa sẽ bị đùn đẩy về fía nào?

Dạ, em định Xoá dòng khi click chuột và dữ liệu tự động sắp xếp lại để ko có khoảng trống khi xoá đi dòng đấy a ah

 

[JungSangAh]

Em cảm ơn anh nhé. Em sửa được lỗi rồi ạ