Tách chuỗi ký tự

[huonglien1901]

Em chào mọi người!

Em có vấn đề nhờ mọi người hỗ trợ.

Em muốn tách chuỗi như file đính kèm:

Yêu cầu: Khi gặp những ký tự chữ thì lầy từ ký tự đó lấy về sau:

Em cảm ơn mọi người nhiều!

 

[befaint]

Thử vậy xem .

 

[Hoàng Tuấn 868]

Yêu cầu: Khi gặp những ký tự chữ thì lầy từ ký tự đó lấy về sau:

Bạn tham khảo...................

 

[CHAOQUAY]

Em chào mọi người!

Em có vấn đề nhờ mọi người hỗ trợ.

Em muốn tách chuỗi như file đính kèm:

Yêu cầu: Khi gặp những ký tự chữ thì lầy từ ký tự đó lấy về sau:

Em cảm ơn mọi người nhiều!

Thử hàm tự tạo

Option Explicit

Function Duoi(Chuoi)
Static reg As Object
Set reg = CreateObject("vbScript.RegExp")
reg.Pattern = "[A-Z]+.+"
reg.Global = True
If reg.test(Chuoi) Then
    Duoi = reg.Execute(Chuoi)(0)
End If
End Function

 

[huonglien1901]

Bạn tham khảo...................

.........

 

[dazkangel]

Bài này viết hàm đơn giản mà @@
=MID(A2,AGGREGATE(15,6,SEARCH(CHAR(ROW($65:$90)),A2),1),99)

 

[huonglien1901]

Bài này viết hàm đơn giản mà @@
=MID(A2,AGGREGATE(15,6,SEARCH(CHAR(ROW($65:$90)),A2),1),99)

Trường hợp không bắt đầu bằng ký tự khác có công thức nào tổng quát không Anh?

 

[huonglien1901]

Bài này viết hàm đơn giản mà @@
=MID(A2,AGGREGATE(15,6,SEARCH(CHAR(ROW($65:$90)),A2),1),99)

Em cảm ơn Anh nhiều nha

 

[dazkangel]

Trường hợp không bắt đầu bằng ký tự khác có công thức nào tổng quát không Anh?

Thì nó bao hàm mọi ký tự rồi, em muốn những ký tự nào thì phải đưa ra cho mọi người xem chứ.
Thôi xài đỡ hàm này xem:

=MID(A2,MATCH(TRUE,ISERR(-MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)),),LEN(A2))

 

[huonglien1901]

Thì nó bao hàm mọi ký tự rồi, em muốn những ký tự nào thì phải đưa ra cho mọi người xem chứ.
Thôi xài đỡ hàm này xem:

=MID(A2,MATCH(TRUE,ISERR(-MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)),),99)

Em đã xem lại rồi, em test kết quả đều cho kết quả mỹ mãn .

Cảm ơn Anh nhiều!

 

[phuongvq123]

Em đã xem lại rồi, em test kết quả đều cho kết quả mỹ mãn .

Cảm ơn Anh nhiều!

bạn tham khảo L))

=MID(A2;MIN(IFERROR(SEARCH(CHAR(ROW($A$97:$A$122));A2);LEN(A2)+1));1+LEN(A2)-MIN(IFERROR(SEARCH(CHAR(ROW($A$97:$A$122));A2);LEN(A2)+1)))

 

[quangktb52]

=MID(A2,FIND("A",A2),LEN(A2)-FIND("A",A2)+1)