Nhờ giúp đỡ định dạng có điều kiện (1 người xem)

[nthxe]

Kính chào các anh chị
Tôi có file excel được tổ chức như sau nhờ các anh chị giúp

A ========= B
1 =========Lợn
Thái Bình ===Lợn sữa
Hải Phòng ==Lợn
2 =========Gà
Hải Phòng ===Gà con
Hải Dương ===Gà
Hưng Yên ===Gà trống

Cột A gồm các dòng phân theo nhóm: number, text; number, text, text
Cột B gồm các dòng chứa text

Mong muốn
Trong nhóm 1, text ở ô B4(Lợn) = text ở ô B2 (Lợn) thì ô B4 có nền màu vàng, text ở ô B3(lợn sữa) khác text ở B2 (Lợn) nên B3 có nền trắng

Tương tự, với nhóm 2, các ô B7 cũng có nền màu vàng, các ô khác có nền trắng

Cảm ơn các anh chị

(Hic, insert table nhưng bị vỡ nên đành gõ tạm như trên, các bác xem file đính kèm giúp. Tks)

 

[Ba Tê]

Kính chào các anh chị
Tôi có file excel được tổ chức như sau nhờ các anh chị giúp

A ========= B
1 =========Lợn
Thái Bình ===Lợn sữa
Hải Phòng ==Lợn
2 =========Gà
Hải Phòng ===Gà con
Hải Dương ===Gà
Hưng Yên ===Gà trống

Cột A gồm các dòng phân theo nhóm: number, text; number, text, text
Cột B gồm các dòng chứa text

Mong muốn
Trong nhóm 1, text ở ô B4(Lợn) = text ở ô B2 (Lợn) thì ô B4 có nền màu vàng, text ở ô B3(lợn sữa) khác text ở B2 (Lợn) nên B3 có nền trắng

Tương tự, với nhóm 2, các ô B7 cũng có nền màu vàng, các ô khác có nền trắng

Cảm ơn các anh chị

(Hic, insert table nhưng bị vỡ nên đành gõ tạm như trên, các bác xem file đính kèm giúp. Tks)

Dữ liệu của bạn không "thật" chút nào, vì vậy nếu có dữ liệu thật thì bạn tự chỉnh code lại cho phù hợp nhé.
[GPECODE=vb]Public Sub KhongThat()
Dim Rng As Range, Cll As Range, DK As String, Tem As String
Set Rng = Range([B2], [B65000].End(xlUp))
Rng.Interior.ColorIndex = 0
For Each Cll In Rng
Tem = UCase(Cll)
If IsNumeric(Cll.Offset(, -1)) Then
DK = Tem
Else
If Tem = DK Then Cll.Interior.ColorIndex = 36
End If
Next Cll
Set Rng = Nothing
End Sub[/GPECODE]

 

[nthxe]

Cảm ơn bạn, không phải dữ liệu không thật đâu mà công việc bên chuyên ngành nông nghiệp của mình là liên quan đến gà lợn mà. Chỉ có cấu trúc thì không thật thôi, file của mình nó sẽ là cột E và F chứ không phải cột A và B thôi.