dấu hàng trống.

[liem23271]

Xin vui lòng chỉ giúp mình cách giấu các hàng trống trong một sheet (không dùng lệnh hide row nhé).
Xin cám ơn !

 

[Ba Tê]

Xin vui lòng chỉ giúp mình cách giấu các hàng trống trong một sheet (không dùng lệnh hide row nhé).
Xin cám ơn !

Ý Bạn muốn dùng Filter hay Code VBA hay gì gì khác?

 

[Hai Lúa Miền Tây]

Xin vui lòng chỉ giúp mình cách giấu các hàng trống trong một sheet (không dùng lệnh hide row nhé).
Xin cám ơn !

Dùng AutoFilter chọn NonBlanks, còn muốn dùng code thì Record lại Macro động tác vừa rồi là được code.

 

[TongDe]

tham khảo cái ni coi có dùng được không

 

[ndu96081631]

tham khảo cái ni coi có dùng được không

Ẩn dòng mà dùng đến 2 vòng lập For thì thiệt là... quá dở
File của bạn tôi chỉ cần:
- Chọn vùng
- Ctrl + G\Special\Blanks
- Ctrl + (
Vậy là xong!
Nếu viết code, tôi dựa trên cơ sở này, vô cùng ngắn gọn
Mặc khác, tôi cũng chỉ cần 1 Button là đủ
Mượn file của bạn, tôi làm lại như sau:

Private Sub CommandButton1_Click()
  With CommandButton1
    Range("bang").SpecialCells(4).EntireRow.Hidden = (.Caption = "Hide Row")
    .Caption = IIf(.Caption = "Hide Row", "Show All", "Hide Row")
  End With
End Sub

Vừa ẩn, vừa hiện chỉ 1 Button và 1 code duy nhất