Cách ẩn hoặc xoá những ô không có dữ liệu

[shootingstar]

Mình làm phần mềm khi kết xuất ra excel thì cứ một ô có dữ liệu ô tiếp theo thì không có, có cách nào có thể hide hoặc delete những ô không có dữ liệu nhanh không, mình có gửi file ví dụ các bạn xem thử giúp giùm mình với nha (cái này là mình tự tạo để ví dụ)
Cám ơn các bạn nhiều!

 

[dhn46]

Nếu hide thì chỉ cần autofillter là ok
Còn nếu bạn biết VBA thì xoá khó gì đâu.

 

[TrungChinhs]

Mình làm phần mềm khi kết xuất ra excel thì cứ một ô có dữ liệu ô tiếp theo thì không có, có cách nào có thể hide hoặc delete những ô không có dữ liệu nhanh không, mình có gửi file ví dụ các bạn xem thử giúp giùm mình với nha (cái này là mình tự tạo để ví dụ)
Cám ơn các bạn nhiều!

Tặng bạn cái này: không dùng vòng lặp và cũng không dùng Autofillter (dùng Autofillter khi xóa dòng tốc độ chậm hơn).

Sub Delete_RowNonBanks()
    With Range([b7], [b65000].End(3))
        .SpecialCells(2).EntireRow.Hidden = 1
        .SpecialCells(12).EntireRow.Delete
        .SpecialCells(2).EntireRow.Hidden = 0
    End With
End Sub

 

[shootingstar]

Mình không biết VBA đâu bạn ơi, đoạn code đó sử dụng như thế nào vậy?
Còn nếu mình muốn ẩn hoặc xoá mà dùng autofillter thì dùng như thế nào vậy?

 

[TrungChinhs]

Mình không biết VBA đâu bạn ơi, đoạn code đó sử dụng như thế nào vậy?
Còn nếu mình muốn ẩn hoặc xoá mà dùng autofillter thì dùng như thế nào vậy?

ah thấy bạn nói đang làm phần mềm nên tưởng là bạn biết VBA. Vậy thì bạn tải File này về và nhấn Ctrl+Shift+D để chạy code nha. Muốn xem code thì nhấn Alt+F11

 

[shootingstar]

Còn nếu sử dụng autofillter thì sử dụng sao vậy bạn?
Hi...hướng dẫn mình kỹ một xíu đi bạn (đầu tiên là mình phải làm gì ý) mình là dân acountant mấy cái cái này mình ngu lắm, sao mình tải file của bạn về nhấn ctrl+shift+d mà có thấy gì đâu mà mình nhấn alt+f11 cũng chẳng thấy gì hết, có phải click chọn ô hay click vào chỗ nào khác không vậy bạn.
Nếu bây giờ mình kết xuất một file trên phần mềm ra excel mà mình muốn xoá hay ẩn thì mình sử dụng code của bạn như thế nào?

 

[TrungChinhs]

Còn nếu sử dụng autofillter thì sử dụng sao vậy bạn

Bạn chọn quét từ C6 đến hết bảng rồi vào Menu Data chọn Autofillter rồi bấm vào mũi tên
Nếu muốn ẩn dòng trống thì chọn NonBlanks
Nếu muốn xóa dòng trống thì chọn Blanks rồi quét chọn các dòng trống (từ dưới ô C6 đến hết bảng) và rút dòng.

 

[shootingstar]

Hi...làm được rồi cám ơn bạn nhiều nha!