Nhờ xử lý cắt chuỗi rồi chạy Vlookup bằng VBA (1 người xem)

[MinhKhai]

Nhờ các anh chị hoàn thiện đoạn code VBA để Excel tìm kiếm 1 phần của chuỗi nhập vào bằng Vlookup hoặc 1 hàm nào đó. Trong file em sử dụng hàm trên sheet làm trung gian do chưa cắt được chuỗi tìm kiếm mong muốn, giờ muốn VBA xử lý hết luôn.
Trân trọng cảm ơn các anh chị

 

[HUONGHCKT]

Nhờ các anh chị hoàn thiện đoạn code VBA để Excel tìm kiếm 1 phần của chuỗi nhập vào bằng Vlookup hoặc 1 hàm nào đó. Trong file em sử dụng hàm trên sheet làm trung gian do chưa cắt được chuỗi tìm kiếm mong muốn, giờ muốn VBA xử lý hết luôn.
Trân trọng cảm ơn các anh chị

Tham khảo code trong file:
1/ Bắt sự kiện thay đổi ô C4:C... (chạy hàm UDF -kết quả trả về ô D4...)
2/ Thử E4=ReplaceVlookup(D4) và Enter để được kết quả tại E4
3/ Nhấn nút chạy code để được các kết quả tại F4:F....

 

[MinhKhai]

Tham khảo code trong file:
1/ Bắt sự kiện thay đổi ô C4:C... (chạy hàm UDF -kết quả trả về ô D4...)
2/ Thử E4=ReplaceVlookup(D4) và Enter để được kết quả tại E4
3/ Nhấn nút chạy code để được các kết quả tại F4:F....

Cảm ơn file và code của bạn. Mình không muốn dùng hàm trong trường hợp này (dù là UDF). Nếu dùng hàm thì mình dùng Vlookup với hàm có sẵn trong đó giá trị tìm kiếm chính là giá trị trong cột F.
Mong bạn tiếp tục hỗ trợ.

 

[HUONGHCKT]

Cảm ơn file và code của bạn. Mình không muốn dùng hàm trong trường hợp này (dù là UDF). Nếu dùng hàm thì mình dùng Vlookup với hàm có sẵn trong đó giá trị tìm kiếm chính là giá trị trong cột F.
Mong bạn tiếp tục hỗ trợ.

Tôi đưa cho bạn 3 hướng để giải bài này theo yêu cầu của bạn.
1/ Là để bạn gõ xong cột C và enter là đã có kết quả ở cột D (sẽ rất tiện khi bạn nhập vào cột C mà không cần phải gõ hàm hay làm gì cả mã đã có dữ kiệu được tự động gán vào), nhất là trường hợp trong phiên làm việc hôm nay chỉ nhập 1 số dòng. mai nhập 1 số dòng.
2/ Dùng hàm UDF : sẽ rất tiện nếu bạn muốn kết quả ở 1 cột khác nào đó do bạn chọn. thậm chí là ở sheet khác
3/ Dùng "bấm một phát" có luôn kết quả ở cột mong muốn. Sẽ rất tiện nếu dữ liệu cũ đã có mà chưa có được kết quả mong muốn.
Lựa chọn sử dụng như thế nào là tùy vào bạn.
Chúc vui, khỏe, thành công.