Ẩn các dòng trống khi ra lệnh in

[dunghtgiga]

Chào các bạn,

Mình có một bảng tính mong muốn khi ra lệnh in các dòng trống không có dữ liệu sẽ được ẩn đi không hiển thị, một lưu ý nhỏ: các dòng này có thể có hoặc không có công thức.

 

[BuiQuangThuan]

Bác thử duyệt qua các dòng. Ô nào khác rỗng thì giữ lại. Còn lại ẩn đi

 

[dunghtgiga]

Bác thử duyệt qua các dòng. Ô nào khác rỗng thì giữ lại. Còn lại ẩn đi

Thân chào bạn,

Ví có những dòng mặc dù nhìn thấy nó rỗng nhưng thực tế đang có công thức nên mình chưa biết sử dụng hàm nào cho đúng.

 

[dunghtgiga]

Mình đã xử lý được vấn đề rồi nha, mình để lại dòng lệnh cho các bạn nào gặp phải vấn đề giống mình:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim xRg As Range
Application.ScreenUpdating = False
For Each xRg In Range("vùng dữ liệu lọc ẩn ví dụ E11:E80")
If xRg.Value = "" Then
xRg.EntireRow.Hidden = True
Else
xRg.EntireRow.Hidden = False
End If
Next xRg
Application.ScreenUpdating = True
End Sub

Cảm ơn các bạn.