Ẩn / Hiện hàng trong Excel dựa trên giá trị ô bằng VBA

Ẩn / Hiện hàng trong Excel dựa trên giá trị ô bằng VBA

Tôi đã tìm kiếm cả ngày để tìm câu trả lời cho điều này và tôi đã đi gần hết chặng đường với một vấn đề:

Tôi đang cố ẩn một hàng khi nó trả về giá trị 0, tuy nhiên, khi tôi nhập dữ liệu mới vào trang tính thay đổi giá trị từ 0 thành một giá trị nào đó, tôi muốn nó bỏ ẩn.

Tôi đã nhận được mã VBA này cho đến nay và nó hoạt động tốt để ẩn các giá trị 0, nhưng nó sẽ không ẩn một giá trị đã thay đổi từ 0 thành một giá trị nào đó.

Private Sub Worksheet_calculate ()
Dim LastRow As Long, c As Range
Application.EnableEvents = Sai
LastRow = Cells (Cells.Rows.Count, "E"). End (xlUp) .Row
Khi có lỗi Tiếp tục tiếp theo
Đối với mỗi c Trong phạm vi ("E2: E" & LastRow)
Nếu c.Value = 0 Thì
c.EntireRow.Hidden = True
ElseIf c.Value> 0 Sau đó
c. Kích hoạt
c.EntireRow.Hidden = Sai
Kết thúc nếu
Tiếp theo
Về lỗi GoTo 0
Application.EnableEvents = True
Kết thúc Sub

CHỈNH SỬA:

Tôi đã tìm thấy một giải pháp sẽ hoạt động ngay bây giờ. Tôi đã thêm macro được gắn vào một nút để hiện tất cả các hàng. Sau đó, các cú đá ở trên xảy ra và bảng được cập nhật.




Câu trả lời:

Xin chào Sirrah,

Rất vui khi biết vấn đề của bạn đã được giải quyết.

Và cảm ơn bạn đã chia sẻ thông tin tại đây trong Cộng đồng Microsoft.

Vui lòng liên hệ với chúng tôi nếu có bất kỳ vấn đề nào liên quan đến các ứng dụng Office.

Cảm ơn bạn.

Comments

Popular posts from this blog

Macro Đã bật Excel bị hỏng khi sử dụng Excel> Chia sẻ> Email> Gửi dưới dạng tệp đính kèm

Microsoft excel - Tạo công thức trong đó dữ liệu từ các tab / Bảng tính khác nhau có thể được đồng bộ hóa dựa trên một ô trên bảng tính

Làm mới danh sách SharePoint đã xuất không thành công trong Excel 2013 khi hoạt động với Excel 2010