Giúp em ẩn dòng không có dữ liệu (1 người xem)

[PHONGGANHHAO]

E học trên diễn đàn nhưng làm hoài không thành công. Nhờ quý anh chị giúp em

 

[TrungChinhs]

Với file của bạn:
Code ẩn dòng trống:

Range([d3], [d65000].End(3)).SpecialCells(4).EntireRow.Hidden = True

Code hiện tất cả các dòng:

Range([d3], [d65000].End(3)).EntireRow.Hidden = false

 

[haonlh]

Code ẩn dòng trống:

Range([d3], [d65000].End([COLOR=#ff0000][SIZE=5]3[/SIZE][/COLOR])).SpecialCells(4).EntireRow.Hidden = True

Tôi đoán là tham số 3 trong End tương ứng với xlUp
Xin hỏi anh TrungChinhs:
Các tham số khác trong End là gì

 

[ndu96081631]

Tôi đoán là tham số 3 trong End tương ứng với xlUp
Xin hỏi anh TrungChinhs:
Các tham số khác trong End là gì

Cái thằng End này tương đương với việc ta bấm phím Alt + mũi tên
Mũi tên có 4 chiều: trái, phải, lên, xuống ---> Vậy bạn biết các tham số khác là gì rồi chứ?

 

[PHONGGANHHAO]

Với file của bạn:
Code ẩn dòng trống:

Range([d3], [d65000].End(3)).SpecialCells(4).EntireRow.Hidden = True

Code hiện tất cả các dòng:

Range([d3], [d65000].End(3)).EntireRow.Hidden = false

Sao làm hoài mà vẫn “im ru”

 

[ndu96081631]

Sao làm hoài mà vẫn “im ru”

Vậy bạn đã "làm" như thế nào?

 

[PHONGGANHHAO]

Em làm như thế này nè

Em làm như thế này nè

 

[ndu96081631]

Em làm như thế này nè

Cái CommandButton của bạn chẳng ăn nhập gì với code bạn viết cả!
Giờ bạn xóa CommandButon đi, vẽ lại cái khác và chèn lại code nhé
(ngoài ra tôi thấy code trong file cũng đâu có giống với code hướng dẫn tại bài 2 đâu)

 

[haonlh]

Cái thằng End này tương đương với việc ta bấm phím Alt + mũi tên
Mũi tên có 4 chiều: trái, phải, lên, xuống ---> Vậy bạn biết các tham số khác là gì rồi chứ?

Có lẽ anh ndu nhầm Ctrl thành Alt

Tôi thử thay các tham số 1 - 4 thì có nghĩa và ý nghĩa của nó là
1: xlToLeft
2: xlToRight
3: xlUp
4: xlDown

Biết để nhập nhanh tham số cho End.

 

[PHONGGANHHAO]

Cái CommandButton của bạn chẳng ăn nhập gì với code bạn viết cả!
Giờ bạn xóa CommandButon đi, vẽ lại cái khác và chèn lại code nhé
(ngoài ra tôi thấy code trong file cũng đâu có giống với code hướng dẫn tại bài 2 đâu)

Em cố gắng làm hoài nhưng kg được anh ơi

 

[ndu96081631]

Em cố gắng làm hoài nhưng kg được anh ơi

Sao mà không được chứ
Tôi làm luôn đây! Xem file

 

[PHONGGANHHAO]

Nó bị lỗi khi ẩn thì mất dòng (STT)

Em tải file anh về làm. Nó bị lỗi khi ẩn thì mất dòng (STT) : 13+17+40+49+57+60+75
Nhờ anh ktra file đính kèm e gửi nhe

 

[ndu96081631]

Em tải file anh về làm. Nó bị lỗi khi ẩn thì mất dòng (STT) : 13+17+40+49+57+60+75
Nhờ anh ktra file đính kèm e gửi nhe

Thì nó phải như vậy rồi... Dòng số STT = 13+17+40+49+57+60+75 đều có cell rổng tại cột E (dòng tương ứng)... Lý do vì vùng dữ liệu ta xét là Range([D3], [D65000].End(3)).Resize(, 4) <===> D3:G323
Nếu bạn muốn chỉ ẩn dòng có cell trống tại cột D thôi thì chỉnh lại vùng dữ liệu thành Range([D3], [D65000].End(3))
--------------
Tóm lại: Tự mình phân tích và nghiên cứu lấy với những vấn đề đơn giản (vậy mới mong tiến bộ)