Cách lấy tên tỉnh từ ấp xã huyện tỉnh

[tranhiep_116]

DEAR ALL!
Các anh/chị vui lòng chỉ giúp em với. Em có thông tin như sau:
-Tân bình, tân long, mang thít, vĩnh long.
-phong hòa, lai vung, đồng tháp.
-hòa phú, long hồ, vĩnh long.
-p.bình thủy, tp cần thơ, cần thơ.
Yêu cầu: chỉ lâý tên tỉnh thôi.

View more random threads:

• Báo lỗi #value trong excel do nguyên nhân gì?
• kính nhờ các bác chỉ giáo, rút trích dữ liệu.!
• Công thức trừ lũy kế chi tiết
• Dùng 1 macro điều khiển 1 macro khác
• Tính ngày nghỉ phép năm
• Gộp thông tin định mức 2 sheet excel thành 1
• Nhờ giúp đỡ Sub dò tìm
• Tắt thông báo tự tìm kiếm trong excel 2010
• Cách tổng từng nhóm trong 1 cột
• Bút toán điều chỉnh chênh lệch giữa sổ sách với thực tế xuất dùng

[hungvietuc1]

DEAR ALL!
Các anh/chị vui lòng chỉ giúp em với. Em có thông tin như sau:
-Tân bình, tân long, mang thít, vĩnh long.
-phong hòa, lai vung, đồng tháp.
-hòa phú, long hồ, vĩnh long.
-p.bình thủy, tp cần thơ, cần thơ.
Yêu cầu: chỉ lâý tên tỉnh thôi.

Góp ý cho bạn:

Bạn nên có File với tiêu đề và 1 ít dữ liệu để các thành viên giúp bạn được nhanh hơn và thực tế hơn.

[khanhcool]

Mình gét nhất cái từ Dear all!

[thethitotiu]

DEAR ALL!
Các anh/chị vui lòng chỉ giúp em với. Em có thông tin như sau:
-Tân bình, tân long, mang thít, vĩnh long.
-phong hòa, lai vung, đồng tháp.
-hòa phú, long hồ, vĩnh long.
-p.bình thủy, tp cần thơ, cần thơ.
Yêu cầu: chỉ lâý tên tỉnh thôi.

Tôi dùng VBA, bạn mở File nhấn nút "TÁCH" và xem kết quả nhé!

Option Explicit
Sub Chuot0106()
Application.ScreenUpdating = False
Dim i As Long, Lr As Long, DL As Range, KQ(), WS As Object

    Set WS = Application.WorksheetFunction
    Lr = Sheet1.Range("A1000000").End(xlUp).Row
    Set DL = Sheet1.Range("B1:B" & Lr)
    ReDim KQ(1 To DL.Rows.Count, 1 To 1)
    Sheet1.Range("A1:A" & Lr).Copy Sheet1.Range("B1")
    Range("B1:B" & Lr).Replace What:=",", Replacement:="              "
For i = 1 To DL.Rows.Count
        KQ(i, 1) = WS.Trim(Right(DL(i, 1), 20))
Next i
    Sheet1.Range("B1").Resize(i - 1, 1) = KQ
    Sheet1.Columns.AutoFit
    
    Application.ScreenUpdating = True
End Sub

[phuongaudio]

Tôi dùng VBA, bạn mở File nhấn nút "TÁCH" và xem kết quả nhé!

<div class="bbcode_container">
<div class="bbcode_description">Code:

</div>
</div>
Bạn dùng dấu phẩy cuối cùng để làm dấu hiệu nhận biết? Tôi thấy không ăn thua rồi. Ví dụ ta có chuỗi "phong hòa, lai vung, đồng tháp, Việt nam" thì kết quả nhận được sẽ là gì?
Thông thường với bài toán lấy tên tỉnh, ta sẽ dựa vào bảng tra cứu 63 tỉnh thành để dò tìm. Bài toán này có đầy trên GPE, thậm chí chỉ 1 công thức đơn giản cũng làm được chứ không phải thứ gì cũng VBA mới tối ưu đâu
-------------------------------

DEAR ALL!
Các anh/chị vui lòng chỉ giúp em với. Em có thông tin như sau:
-Tân bình, tân long, mang thít, vĩnh long.
-phong hòa, lai vung, đồng tháp.
-hòa phú, long hồ, vĩnh long.
-p.bình thủy, tp cần thơ, cần thơ.
Yêu cầu: chỉ lâý tên tỉnh thôi.

Có file mới nói chuyện tiếp được

[nguyenthypro]

Bạn dùng dấu phẩy cuối cùng để làm dấu hiệu nhận biết? Tôi thấy không ăn thua rồi. Ví dụ ta có chuỗi "phong hòa, lai vung, đồng tháp, Việt nam" thì kết quả nhận được sẽ là gì?
Thông thường với bài toán lấy tên tỉnh, ta sẽ dựa vào bảng tra cứu 63 tỉnh thành để dò tìm. Bài toán này có đầy trên GPE, thậm chí chỉ 1 công thức đơn giản cũng làm được chứ không phải thứ gì cũng VBA mới tối ưu đâu
-------------------------------


Có file mới nói chuyện tiếp được

Em làm dựa theo dữ liệu mẫu tác giả đưa lên thôi ạ. Mà theo cách của thầy cũng chưa ổn lắm. Ví dụ: Xã hòa phú, quảng ninh, quảng bình, việt nam thì khi dò nó sẽ ra 2 địa danh là "Quảng Ninh" và "Quảng Bình" cùng là tỉnh ạ.

[sock123]

Em làm dựa theo dữ liệu mẫu tác giả đưa lên thôi ạ. Mà theo cách của thầy cũng chưa ổn lắm. Ví dụ: Xã hòa phú, quảng ninh, quảng bình, việt nam thì khi dò nó sẽ ra 2 địa danh là "Quảng Ninh" và "Quảng Bình" cùng là tỉnh ạ.

Cái gì cũng có ưu điểm và nhược điểm thôi
Ý tôi chỉ nói rằng: Bài này không cần đến VBA (vì có VBA thì cũng chẳng tối ưu hơn công thức)

[thanhvannb91]

Cái gì cũng có ưu điểm và nhược điểm thôi
Ý tôi chỉ nói rằng: Bài này không cần đến VBA (vì có VBA thì cũng chẳng tối ưu hơn công thức)

Em cảm ơn thầy! Thực ra em không nghĩ là làm bằng VBA sẽ tối ưu mà bởi vì việc sử dụng công thức của em không tốt nên em hay dùng VBA thôi ạ!

[zphot9x]

Em cảm ơn thầy! Thực ra em không nghĩ là làm bằng VBA sẽ tối ưu mà bởi vì việc sử dụng công thức của em không tốt nên em hay dùng VBA thôi ạ!

Dù công thức hay VBA thì cũng chỉ là GIẢI THUẬT!
Có giải thuật tốt, làm bằng cái gì cũng được cả (không quan trong công cụ, chỉ quan trọng hướng đi)

[hocon84]

Giúp mình với. Cảm ơn nhiều.