[Hỏi] Chọn các ô có kết quả bằng 0 trong excel

Chào tất ace trên diễn đàn. Mình có khó khăn trong excel mong ace diễn đàn ai biết thì giúp đỡ mình với, xin cảm ơn nhiều !.
Giờ mình muốn chon các ô có kết quả bằng không ( 0 ) ở sheet Cước VCCG cột tổng cước, bạn nào biết cách nào chỉ giúp mình... Mình có đính kèm file theo

nhankx1 gửi lúc 9/12/2014 05:12
Bạn có thể chỉnh code để kết quả chon ngược lại được không hihi, mình muốn là ch ...

Nó chọn các ô bằng 0 đó bạn, câu Rng.Value <> 0 Then Rng.EntireRow.Hidden = True chỉ ra những ô nào khác 0 thì ẩn cả dòng chứa ô đó.
Câu Range("q7:q202").SpecialCells(xlCellTypeVisible).Select ---> Chọn các ô không bị ẩn trong vùng chọn---> Thỏa mãn yêu cầu đề bài của bạn.

File này của bạn có cái hay nha:
Nếu bạn Filter và chọn Blanks hoặc chọn 0 hay gotospecial chọn Blanks đều không chọn hết được tất cả các ô kết quả bằng 0. File này rơi vào trường hợp đặc biệt các kết quả của công thức tính trả về 0, cụ thể là các ô mà bạn Merge có kết quả trả về 0 thì EXCEL hiểu nó là Nonblanks chứ không phải là Blanks. Tôi nghĩ có thể dùng vòng lặp For để xác định các ô có giá trị 0 này, tuy nhiên không biết bạn muốn làm gì tiếp theo, bạn có thể trao đổi tiếp theo, hoặc ai đó trả lời được câu hỏi này cho bạn sẽ trao đổi tiếp nha!

Không biết có đúng theo ý của Bạn không:
Kết quả đã có mời load về !

Tôi mới nghĩ ra cách hơi oằn tà là vằn tí, bạn thử xem sao:

[Visual Basic] 纯文本查看 复制代码

Sub choncellzero()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim Rng As Range
Rows("7:202").Hidden = False
For Each Rng In Range("q7:q202")
    If Rng.Value = vbNullString Or Rng.Value <> 0 Then Rng.EntireRow.Hidden = True
Next Rng
Range("q7:q202").SpecialCells(xlCellTypeVisible).Select
Application.ScreenUpdating = True
Application.Calculation = xlCalculationAutomatic
End Sub

tuandaiminh2012 gửi lúc 5/12/2014 14:36
Không biết có đúng theo ý của Bạn không:
Kết quả đã có mời load về !

ah ! đúng vậy đó anh ! cảm ơn anh nhiều  !

tranhungdao12a3 gửi lúc 5/12/2014 21:24
Tôi mới nghĩ ra cách hơi oằn tà là vằn tí, bạn thử xem sao:
[mw_shl_code=vb,true]Sub cho ...

Bạn có thể chỉnh code để kết quả chon ngược lại được không hihi, mình muốn là chọn các ô có kết quả bằng không rồi sau đó cho dòng của vật liệu bằng không đó ẩn đi ( code của bạn đang chọn các ô có kết quả khác không rồi ). Cảm ơn bạn nhiều nhiều !. Tiện đây mình cũng nhờ bạn xem có cách nào mà có thể đánh số thứ tự lại được không ( tại ô STT ) , Vì khi ẩn dòng đi thì số thứ tự của các dòng sẽ bị thay đổi đi.

Cảm ơn diễn đàn đã quan tâm tới nội dung của mình, Chúc diễn đàn ngày mới vui vẻ - Làm việc hiệu quả !

Cảm ơn bạn nhiều. Mình đã chạy thử code của bạn làm và nó cứ chọn ô nào có kết quả khác không là ẩn đi, còn ô có kết quả Bằng không thì lại không ẩn. Bạn giúp mình đi

Cảm bạn tranhungdao12a3 nhiều!