Tìm và thay thế dùng vba

[Quang_Hải]

Các anh chị xem file và cho mình hướng giải quyết bài toán này.
Ở sheet B, cột C minh cần dịch sang tiếng Anh từ cột B. Mình đã tạo thông tin ở sheet DATA để sử dụng hàm vlookup, nhưng không thể dich được những cụm từ ghép.

 

[concogia]

Các anh chị xem file và cho mình hướng giải quyết bài toán này.
Ở sheet B, cột C minh cần dịch sang tiếng Anh từ cột B. Mình đã tạo thông tin ở sheet DATA để sử dụng hàm vlookup, nhưng không thể dich được những cụm từ ghép.

Làm đại vì chưa hiểu lắm
Hình như cột số lượng ở bảng kết quả của bạn ( sheet B, cột E ) từ màu DO trở đi nó ........trật lấc. Híc
Thân

 

[Quang_Hải]

Cảm ơn bạn đã gợi ý, từ code của bạn mình đã áp dụng vào file này để thay thế từ được rồi, nhưng giờ mình muốn thứ tự từ trong cột C đảo lại nhưng chưa biết làm thế nào. Ví dụ sau khi dich mình có cụm tử RED DARK, giờ làm sao để cho nó trở thành DARK RED?

 

[concogia]

Cảm ơn bạn đã gợi ý, từ code của bạn mình đã áp dụng vào file này để thay thế từ được rồi, nhưng giờ mình muốn thứ tự từ trong cột C đảo lại nhưng chưa biết làm thế nào. Ví dụ sau khi dich mình có cụm tử RED DARK, giờ làm sao để cho nó trở thành DARK RED?

Mình nghĩ chỉ có 2 màu nên mới có đoạn code này

   .....
            If InStr(1, Vung(I, 1), "/") Then
                Tach = Split(Vung(I, 1), "/")
                Mg(K, 3) = d.Item(Tach(0)) & "/" & d.Item(Tach(1))
            ......

Khi tách ra màu nào trước nó nằm ở Tach(0) màu sau ở Tach(1) ==> muốn đảo ngược lại thì sửa đoạn í lại: cho Tach(1) trước rồi tới Tach (0)
Thân