Trích thành phố, quận ra khỏi địa chỉ

Liên hệ QC

hellomoto2

Thành viên mới
Tham gia
27/1/09
Bài viết
1
Được thích
0
Chào mọi người, mình có 1 file excel có địa chỉ dạng như file đính kèm. Nhờ mọi người chỉ giúp cách tách "quận", "thành phố" ra khỏi chuỗi địa chỉ.
HTML:
A2: Tầng 9 - Tòa nhà Ruby Plaza - 44 Lê Ngọc Hân - Phường Phạm Đình Hổ - Quận Hai Bà Trưng - TP. Hà Nội
A3: 10 Tân Trào - Phường Tân Phú - Quận 7 - TP. Hồ Chí Minh
A4: 61 Nguyễn Văn Giai - Phường Đa Kao - Quận 1 - TP. Hồ Chí Minh
A5: KCN Phố Nối A - Xã Giai Phạm - Huyện Yên Mỹ - Tỉnh Hưng Yên

Chuỗi "địa chỉ" có nhiều đoạn cách nhau bằng dấu "-". Nôm na mình muốn đoạn cuối cùng bên phải sẽ là thành phố và đoạn kế tiếp sẽ là quận
Cám ơn mọi người
 

File đính kèm

  • tach quan tp.xlsx
    10.1 KB · Đọc: 13
tạm thời dùng code VBA này vậy
Mã:
Function tachquan(Str As String) As String
Dim Arr() As String
Arr = Split(Str, "-")
tachquan = Trim(Arr(UBound(Arr) - 1))


End Function
Function tachTP(Str As String) As String
Dim Arr() As String
Arr = Split(Str, "-")
tachTP = Trim(Arr(UBound(Arr)))
End Function
 

File đính kèm

  • tach quan tp.rar
    8.9 KB · Đọc: 9
công thức mảng tìm tỉnh, thành phố :
Mã:
{=TRIM(RIGHT(A2,LEN(A2)-LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),1)))}

công thức mảng tìm quận:
Mã:
{=TRIM(MID(A2,LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),2)+1,LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),1)-1-LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),2)))}

gõ công thức xong nhấn Ctrl + Shift + Enter
 
công thức mảng tìm tỉnh, thành phố :
Mã:
{=TRIM(RIGHT(A2,LEN(A2)-LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),1)))}

công thức mảng tìm quận:
Mã:
{=TRIM(MID(A2,LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),2)+1,LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),1)-1-LARGE((MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)="-")*ROW(INDIRECT("1:"&LEN(A2))),2)))}

gõ công thức xong nhấn Ctrl + Shift + Enter
Trên GPE thấy nhiều người làm vậy:
Tách tỉnh, thành phố:
Mã:
=TRIM(RIGHT(SUBSTITUTE(A2,"-",REPT(" ",255)),255))
Tách quận:
Mã:
=TRIM(LEFT(RIGHT(SUBSTITUTE(A2,"-",REPT(" ",255)),510),255))
Thân!
 
trên gpe thấy nhiều người làm vậy:
Tách tỉnh, thành phố:
Mã:
=trim(right(substitute(a2,"-",rept(" ",255)),255))
tách quận:
Mã:
=trim(left(right(substitute(a2,"-",rept(" ",255)),510),255))
thân!
đúng là bá đạo thật ! Dùng chính sách chia để trị a, gpe quá hay
 
Web KT
Back
Top Bottom