Tìm kiếm trong một chuỗi

[ruoimuoi]

Ô em muốn lấy là ô màu vàng
Đó chính là mã số thuế có từ 13 đến 14 kí tự
Thông số nhập vào thi đôi khi không theo 1 thứ tự nào cả nên rất khó
Còn lại số điện thoại hay các thông số khác mà ngắn hơn 13 kí tự thì không quan tâm nữa
Thật sự làm phiền mọi người quá

 

[concogia]

Ô em muốn lấy là ô màu vàng
Đó chính là mã số thuế có từ 13 đến 14 kí tự
Thông số nhập vào thi đôi khi không theo 1 thứ tự nào cả nên rất khó
Còn lại số điện thoại hay các thông số khác mà ngắn hơn 13 kí tự thì không quan tâm nữa
Thật sự làm phiền mọi người quá

Thử cái hàm tự tạo Xi-ma-chao này xem

Public Function Mst(Vung As String) As String
    Dim I, SoT, Tam
        SoT = Split(Vung, " ")
            For I = 0 To UBound(SoT)
              If Len(SoT(I)) > 12 And IsNumeric(Left(SoT(I), 1)) Then Mst = SoT(I): Exit Function
            Next
End Function

Kết quả là chuỗi nhé, muốn là số thì chỉnh lại code tí

 

[dat_butmuc]

Ô em muốn lấy là ô màu vàng
Đó chính là mã số thuế có từ 13 đến 14 kí tự
Thông số nhập vào thi đôi khi không theo 1 thứ tự nào cả nên rất khó
Còn lại số điện thoại hay các thông số khác mà ngắn hơn 13 kí tự thì không quan tâm nữa
Thật sự làm phiền mọi người quá

Dùng tạm công thức này:

=TRIM(RIGHT(LEFT(A2,FIND(" |",A2)),15))

 

[MinhCong]

Ô em muốn lấy là ô màu vàng
Đó chính là mã số thuế có từ 13 đến 14 kí tự
Thông số nhập vào thi đôi khi không theo 1 thứ tự nào cả nên rất khó
Còn lại số điện thoại hay các thông số khác mà ngắn hơn 13 kí tự thì không quan tâm nữa
Thật sự làm phiền mọi người quá

Bạn thử dùng công thức sau xem sao nhé!

=TRIM(RIGHT(SUBSTITUTE(LEFT(A1,FIND("|",A1)-2)," ",REPT(" ",LEN(A1))),LEN(A1)))

 

[salam]

Ô em muốn lấy là ô màu vàng
Đó chính là mã số thuế có từ 13 đến 14 kí tự
Thông số nhập vào thi đôi khi không theo 1 thứ tự nào cả nên rất khó
Còn lại số điện thoại hay các thông số khác mà ngắn hơn 13 kí tự thì không quan tâm nữa
Thật sự làm phiền mọi người quá

Công thức dưới theo dữ liệu của bạn

=TRIM(MID(A2;FIND("|";A2)-15;15))

 

[ruoimuoi]

Nếu không có dấu | thì sao ạ?

Thử cái hàm tự tạo Xi-ma-chao này xem

Public Function Mst(Vung As String) As String
    Dim I, SoT, Tam
        SoT = Split(Vung, " ")
            For I = 0 To UBound(SoT)
              If Len(SoT(I)) > 12 And IsNumeric(Left(SoT(I), 1)) Then Mst = SoT(I): Exit Function
            Next
End Function

Kết quả là chuỗi nhé, muốn là số thì chỉnh lại code tí

Ủa sao tải cái file về nó ghi #NAME? là sao bác

 

[Hai Lúa Miền Tây]

Câu 1: Bạn thử thì biết liền
Câu 2: Bạn có Enable macro khi mở file chưa vậy bạn? Nếu chưa thì sẽ không ra kết quả đâu nhé.