VBA EXCEL VIẾT HÀM TÌM KIẾM CHUỖI KÝ TỰ THEO MONG MUỐN

[@Trangnguyen-hm1zj]

Công thức của anh hay quá, anh có thể cho em xin code ko ạ.

[@netui8019]

Hàm này mình thấy rát hay, nhưng sao nó kg thỏa mọi điều kiện, VD: data đem so với 1 Data và 1 data 2, thì sẽ kg có kết quả liền, a có thể xem lại kg, tìm 1 chuối vd: mặt hàng đem so với mặt hàng nhựa là nó kg có quả liền, chỉ cần có 1 khoảng trắng vào là nó kg hiển thị đúng

[@chieutraninh968]

Xin chào Anh, cho em hỏi khi sử dụng hàm Mid trong vba này nếu đổi số 3 thành 4,5,6... thì excel lại tự hiểu là tìm đúng 4,5,6... kí tự thì mới trả về kết quả. Vậy không rõ có cách nào giải quyết được không a. Em cũng không giỏi về vba nên nhờ anh giải đáp a

[@BIMAandR]

Như vậy thì Hàm HE_FIND cần thêm như sau: HE_FIND(A as range, B as range, n as integer) xuống dưới thay số 3 thành n, và khi nhập hàn HE_FIND thì điền số ký tự muốn lấy vào la duco

[@cuongtokim8803]

Xin chào anh, công thức của a rất hay. E xin phép tham khảo code của anh được không ạ?

[@BIMAandR]

Cán ơn Bạn. Mình gửi bạn code tham khảo Function HE_FIND(A As Range, B As Range) As Variant Dim ai As Range Dim bi As Range Dim i As Integer For Each bi In B For Each ai In A For i = 1 To Len(bi.Value) If Mid(bi.Value, i, 3) = ai.Value Then HE_FIND = ai.Value Exit Function End If Next i Next ai Next bi End Function