Xin Code lựa chọn toàn bộ các ô có định dạng #.##0_);-#.##0

[LinDan]

Kính nhờ mọi người cho tôi xin Code mà khi chạy nó lựa chọn toàn bộ các ô định dạng là #.##0_);-#.##0. Xin cảm ơn

 

[kyo]

Kính nhờ mọi người cho tôi xin Code mà khi chạy nó lựa chọn toàn bộ các ô định dạng là #.##0_);-#.##0. Xin cảm ơn

Mình không hiểu mục đích bạn muốn làm gì, lựa chọn để làm gì thế nên mình chỉ cho bạn cách so điều kiện thôi nhé, nếu bạn so được điều kiện thì sẽ lấy nó dễ dàng thôi. Giả sử xét từ A1:A10

For i=1 to 10
    If Sheets("ABC").Range("A" & i).NumberFormat = "#.##0_);-#.##0" Then 
            ......................... dòng lệnh của bạn
    End If
Next i