xóa hàng có giá trị = 0

[jennyvu]

hix mai em thi VBA rồi mà không biết code xóa những hàng có giá trị = 0 như thế nào. mọi người giúp em với. ví dụ em muốn xóa hết những hàng có giá trị = 0 kia đi thì làm thế nào ạ?

 

[tuyettrang186]

hix mai em thi VBA rồi mà không biết code xóa những hàng có giá trị = 0 như thế nào. mọi người giúp em với. ví dụ em muốn xóa hết những hàng có giá trị = 0 kia đi thì làm thế nào ạ?
View attachment 56411

Ý bạn là xoá tất cả dữ liệu nếu giá trị = 0?

 

[nghiaphuc]

hix mai em thi VBA rồi mà không biết code xóa những hàng có giá trị = 0 như thế nào. mọi người giúp em với. ví dụ em muốn xóa hết những hàng có giá trị = 0 kia đi thì làm thế nào ạ?
View attachment 56411

Bạn thử sử dụng chức năng Record Macro và thực hiện các thao tác:
- Sử dụng AutoFilter để lọc ra những hàng có giá trị =0.
- Chọn các hàng này và xóa đi (Delete row).
- Tắt chức năng AutoFilter.
Nhấn Stop Recording, nhấn Alt+F11, xem kết quả các câu lệnh thu được là gì. Cuối cùng là chỉnh sửa một xíu cho phù hợp.

 

[jennyvu]

đây là bảng cân đối phát sinh, yêu cầu của thấy giáo em là viết thêm 1 dòng code vào mẫu code tạo sổ CDPS để khi chạy mẫu sổ ko xuất hiện những dòng không có giá trị.

 

[nghiaphuc]

đây là bảng cân đối phát sinh, yêu cầu của thấy giáo em là viết thêm 1 dòng code vào mẫu code tạo sổ CDPS để khi chạy mẫu sổ ko xuất hiện những dòng không có giá trị.

Nếu vậy thì bạn tạo một bảng tiêu chuẩn có dạng

Tiêu đề cột cần lọc
<>0

Sau đó, sử dụng Advanced Filter với tùy chọn là Copy to another location.
Hoặc thủ công hơn chút nữa là như vầy:

For i=1 to [A65536].End(xlUp).Row+1
     If Range("C" & i)<>0 then ''Copy hàng thứ i qua bên kia
Next i

Tóm lại là nếu có file của bạn thì việc xử lý dễ dàng hơn nhiều!