Đề tài tách số điện thoại khỏi đoạn văn bản
- Thread starter Tài0410
- Ngày gửi
Hoàng Tuấn 868
Đăng ký hôm qua
- Tham gia
- 9/11/19
- Bài viết
- 5,034
- Được thích
- 4,722
Không hiểu hỏi ai. .
Dạ bạn cho mình xin lỗi mình đã sửa lại câu hỏi rồi ạ
Bài này công thức hơi khó. Vả lại tôi cũng lười viết công thức khủng.
Tôi đề nghị dùng hàm UDF (VBA) với Regex.
Function SoDT(s As String) As String
Set RE = CreateObject("vbscript.regexp")
RE.Pattern = "\d{8,10}"
RE.Global = True
RE.IgnoreCase = True
Set allMatches = RE.Execute(s)
If allMatches.Count <> 0 Then
SoDT = allMatches.Item(0)
End If
End Function
Tôi đề nghị dùng hàm UDF (VBA) với Regex.
Function SoDT(s As String) As String
Set RE = CreateObject("vbscript.regexp")
RE.Pattern = "\d{8,10}"
RE.Global = True
RE.IgnoreCase = True
Set allMatches = RE.Execute(s)
If allMatches.Count <> 0 Then
SoDT = allMatches.Item(0)
End If
End Function
Số điện thoại có 8 đến 11 số. Nhập chuỗi vào ô A1
=MID(AGGREGATE(14,6,--(1&MID(A1,ROW($1:$100),{8,9,10,11})),1),2,11)
