Tô màu có điều kiện theo ô

[quanthienhan]

chào các bạn..các bạn xem giúp mình, tô màu theo ô có giá trị như thế này nha...và có thể hiện tên các ô sau khi đã được tô màu không nha..cảm ơn các bạn nhiều..

 

[leonguyenz]

chào các bạn..các bạn xem giúp mình, tô màu theo ô có giá trị như thế này nha...và có thể hiện tên các ô sau khi đã được tô màu không nha..cảm ơn các bạn nhiều..

Bạn chọn vùng A1:G2, vào Conditional Formatting, làm theo hình vẽ, sau khi nhấn Format, chọn màu ở Tab Fill và nhấn OK.

 

[quanthienhan]

Cám ơn bạn..mình làm được rồi..bạn chỉ thêm cho mình , làm sao để có thể hiện tên các ô đã được tô màu như file của mình không bạn..

 

[leonguyenz]

Cám ơn bạn..mình làm được rồi..bạn chỉ thêm cho mình , làm sao để có thể hiện tên các ô đã được tô màu như file của mình không bạn..

Dùng hàm tự tạo thử xem:
[gpecode=vb]
Function GetAdd(Rng As Range, Crit As Variant, sNum As Byte)
Dim Cll As Range, Num As Byte
For Each Cll In Rng
If Cll = Crit Then
Num = Num + 1
If Num = sNum Then
GetAdd = Cll.Address(0, 0)
Exit For
End If
End If
Next Cll
End Function
[/gpecode]

 

[quanthienhan]

banj xem lại giúp mình nha..khi mình thay đổi K1.. số ô tô màu cũng thay đổi, nhưng ô hiện tên lại không thay đổi..mình không biết về excel ..bạn có thể hướng dẫn cụ thể cho mình được không..cảm ơn bạn rất nhiều

 

[leonguyenz]

banj xem lại giúp mình nha..khi mình thay đổi K1.. số ô tô màu cũng thay đổi, nhưng ô hiện tên lại không thay đổi..mình không biết về excel ..bạn có thể hướng dẫn cụ thể cho mình được không..cảm ơn bạn rất nhiều

Thì bạn thay số 4 bằng ô K1. =GetAdd($A$1:$G$2,$K$1,COLUMN(A1))
Tôi sửa 1 chút trong code để lấy giá trị rỗng nếu không tìm thấy.

 

[quanthienhan]

Thì bạn thay số 4 bằng ô K1. =GetAdd($A$1:$G$2,$K$1,COLUMN(A1))
Tôi sửa 1 chút trong code để lấy giá trị rỗng nếu không tìm thấy.

mình đã làm như bạn..nhưng mỗi khi thay đổi K1 thì D4 bão lỗi...không biết do máy mình..hay kết thúc lệnh của mình sai..mình thay K1 xong ấn enter

 

[leonguyenz]

mình đã làm như bạn..nhưng mỗi khi thay đổi K1 thì D4 bão lỗi...không biết do máy mình..hay kết thúc lệnh của mình sai..mình thay K1 xong ấn enter

Bạn mở Marco chưa? Nếu chưa thì mở Marco lên, nếu không biết cách mở thì search Google tìm cách mở, gõ từ khóa Enable marco Excel 20xx (phiên bản Excel bạn đang sử dụng).

 

[quanthienhan]

cám ơn bạn..mình làm được rồi..cám ơn bạn rất nhiều..