Nhờ anh chị viết em code so sánh dữ liệu 2 cột

[thuy2022]

Em chào anh chị em có bảng dữ liệu 2 cột nhờ anh chị viết em 1 đoạn code so sánh với điều kiện so sánh 2 cột nếu khác giá trị thì bôi màu vàng ạ như trong file ạ
em xin cảm ơn anh chị

 

[Phuocam]

Em chào anh chị em có bảng dữ liệu 2 cột nhờ anh chị viết em 1 đoạn code so sánh với điều kiện so sánh 2 cột nếu khác giá trị thì bôi màu vàng ạ như trong file ạ
em xin cảm ơn anh chị

Chào bạn,

Trường hợp không dùng code thì bạn làm như thế nào để tô màu?

.

 

[HUONGHCKT]

Em chào anh chị em có bảng dữ liệu 2 cột nhờ anh chị viết em 1 đoạn code so sánh với điều kiện so sánh 2 cột nếu khác giá trị thì bôi màu vàng ạ như trong file ạ
em xin cảm ơn anh chị

Nếu chỉ để so sanh dữ liệu 2 cột như trong file, Sao không dùng Conditional formatting nhỉ?

 

[Hoàng Tuấn 868]

Em chào anh chị em có bảng dữ liệu 2 cột nhờ anh chị viết em 1 đoạn code so sánh với điều kiện so sánh 2 cột nếu khác giá trị thì bôi màu vàng ạ như trong file ạ
em xin cảm ơn anh chị

Ví dụ mẫu mà cũng sai.

 

[thuy2022]

Dạ xin lỗi anh chị vì chưa tương tác được với anh chị. sáng nay em bị ong cắn 3 mũi giờ mới đỡ sốt là em vào liền
Em bị nhầm file và nhầm nội dụng ạ
Em nhờ anh chị cho em cái code: Nếu Số lượng 1 cộng Số lượng 2 so sánh với Tổng nếu khác nhau thì sẽ tô màu vàng ạ
em xin cảm ơn anh chị nhiều

 

[Hoàng Tuấn 868]

Em bị nhầm file và nhầm nội dụng ạ

Sao lại cỏ thể nhầm tất tần tật thế được nhỉ, chưa bao giờ gặp vụ thế này.

 

[thuy2022]

Cho em xin lỗi đi anh anh cố gắng giúp em với

 

[Thóc Sama]

Dạ xin lỗi anh chị vì chưa tương tác được với anh chị. sáng nay em bị ong cắn 3 mũi giờ mới đỡ sốt là em vào liền
Em bị nhầm file và nhầm nội dụng ạ
Em nhờ anh chị cho em cái code: Nếu Số lượng 1 cộng Số lượng 2 so sánh với Tổng nếu khác nhau thì sẽ tô màu vàng ạ
em xin cảm ơn anh chị nhiều

Bạn mình thử coi,
biết đâu lại sai....

Sub ABC()
Dim Rng As Range
For Each Rng In Range("A2:A17")
    If Rng <> Rng.Offset(, 1) + Rng.Offset(0, 2) Then
        Rng.Interior.ColorIndex = 35
    End If
Next
End Sub

 

[thuy2022]

Nếu muốn tô màu cho các cột A,B,C thì sao anh
Vì code chỉ tô màu được cột A

 

[Thóc Sama]

Nếu muốn tô màu cho các cột A,B,C thì sao anh
Vì code chỉ tô màu được cột A

Thế thì bạn mình lại thêm một tí nữa

Sub ABC()
Dim Rng As Range
For Each Rng In Range("A2:A17")
    If Rng <> Rng.Offset(, 1) + Rng.Offset(0, 2) Then
        Range(Rng, Rng.Offset(, 2)).Interior.ColorIndex = 35
    End If
Next
End Sub

 

[thuy2022]

Dạ em cảm ơn anh nhiều anh có thể giải thích em câu lệnh như hình vẽ không anh

 

[Thóc Sama]

Dạ em cảm ơn anh nhiều anh có thể giải thích em câu lệnh như hình vẽ không anh

Ý nghĩa của nó là yêu cầu của bạn mình đấy!
Ô bên trái khác tổng 2 ô bên phải thì ...

 

[Hoàng Tuấn 868]

Cho em xin lỗi đi anh anh cố gắng giúp em với

Cái này dùng Conditional Formatting cũng được mà, sao lại cứ phải code nhỉ.

 

[thuy2022]

Dạ xin cảm ơn anh THÓC SAMA
Nếu Conditional formatting thì công thức dùng sao anh Hoàng Tuấn 868

 

[Hoàng Tuấn 868]

Nếu Conditional formatting thì công thức dùng sao anh Hoàng Tuấn 868

Bạn xem thử. . . .

 

[thuy2022]

Dạ. Em Xin cảm ơn anh và các anh nhiều ạ

 

[VetMini]

Cái này dùng Conditional Formatting cũng được mà, sao lại cứ phải code nhỉ.

Tại vì quen nhờ code, chưa bị sai cho nên chưa biết tởn.

Nếu dùng conditional formatting thì khi dữ liệu thay đổi, kết quả thay đổi theo.

Nếu dùng code thì khi dữ liệu thay đổi, chạy code lần nữa. Và nếu chỉ chạy code bài #8 và #10 thì khả năng kết quả sai khá cao.

 

[thuy2022]

Và nếu chỉ chạy code bài #8 và #10 thì khả năng kết quả sai khá cao. thế chắc anh có code khác rồi nhỉ. nếu có cho em xin để học hỏi anh à

 

[VetMini]

Và nếu chỉ chạy code bài #8 và #10 thì khả năng kết quả sai khá cao. thế chắc anh có code khác rồi nhỉ. nếu có cho em xin để học hỏi anh à

Tôi không có code khác.
Tôi chỉ dùng kinh nghiệm, nhìn code ở hai ấy thì biết nó chỉ chạy được 1 lần.
Muốn chạy lần thứ hai thì phải xóa kết quả của lần thứ nhất.

 

[thuy2022]

May quá anh ơi. anh nói em mới biết. Anh xem bổ sung code cho hoàn chỉnh em với
Em xin cảm ơn anh