Hỏi về cách để tạo bộ lọc tỉnh ==> Quận ==> xã (1 người xem)

Liên hệ QC

Người dùng đang xem chủ đề này

Đang trực tuyến: 1 (Thành viên: 0, Khách: 1)
LuuGiaPhúc

LuuGiaPhúc

Thành viên hoạt động
Tham gia
28/7/21
Bài viết
126
Được thích
52
Chào các anh chị trên diễn đàn GPE,
E có 1 file danh sách Tỉnh , Quận , Phường xã như hình bên dưới lưu trong sheet Danh muc tinh thanh,
Em muốn ở sheet Danh sach thi , khi em nhập tên tỉnh thì nó sẽ liệt kê tên quận/huyện ở cột kế bên, tiêp theo, chọn xong quận / huyện thì nó liệt kê Xã / phường.

Tính năng phụ thêm :
Do danh sách quận / huyện / xã phường rất nhiều, nên nếu có thể, dùng VBA để đề xuất sẵn thì càng hay, ví dụ khi nhập chữ Tuyên thì nó sẽ list sẵn Tuyên Quang , khi nhập chữ Huyện Lâm thì nó list sẵn Huyện Lâm Bình. Phần này chỉ là đề xuất thêm nếu có thể làm được thì file sẽ hay hơn, không thì thôi, cho họ click chuột rồi kéo xuống tìm hoặc nhập thủ công cũng được.
Em cảm ơn ạ

1631274021344.png 1631274238019.png
 

File đính kèm

LuuGiaPhúc đã viết:
Chào các anh chị trên diễn đàn GPE,
E có 1 file danh sách Tỉnh , Quận , Phường xã như hình bên dưới lưu trong sheet Danh muc tinh thanh,
Em muốn ở sheet Danh sach thi , khi em nhập tên tỉnh thì nó sẽ liệt kê tên quận/huyện ở cột kế bên, tiêp theo, chọn xong quận / huyện thì nó liệt kê Xã / phường.

Tính năng phụ thêm :
Do danh sách quận / huyện / xã phường rất nhiều, nên nếu có thể, dùng VBA để đề xuất sẵn thì càng hay, ví dụ khi nhập chữ Tuyên thì nó sẽ list sẵn Tuyên Quang , khi nhập chữ Huyện Lâm thì nó list sẵn Huyện Lâm Bình. Phần này chỉ là đề xuất thêm nếu có thể làm được thì file sẽ hay hơn, không thì thôi, cho họ click chuột rồi kéo xuống tìm hoặc nhập thủ công cũng được.
Em cảm ơn ạ

View attachment 265796 View attachment 265797
Nhấp chuột vào đây để mở rộng...
Dùng tạm file Validation + VBA này đã. Vụ tìm theo danh sách rút ngắn phải làm trên combobox mới được.
Copy Validation từ E6:F6 xuống
 

File đính kèm

Maika8008 đã viết:
Dùng tạm file Validation + VBA này đã. Vụ tìm theo danh sách rút ngắn phải làm trên combobox mới được.
Nhấp chuột vào đây để mở rộng...
File
LuuGiaPhúc đã viết:
Tính năng phụ thêm :
Do danh sách quận / huyện / xã phường rất nhiều, nên nếu có thể, dùng VBA để đề xuất sẵn thì càng hay, ví dụ khi nhập chữ Tuyên thì nó sẽ list sẵn Tuyên Quang , khi nhập chữ Huyện Lâm thì nó list sẵn Huyện Lâm Bình. Phần này chỉ là đề xuất thêm nếu có thể làm được thì file sẽ hay hơn, không thì thôi, cho họ click chuột rồi kéo xuống tìm hoặc nhập thủ công cũng được.
Em cảm ơn ạ
Nhấp chuột vào đây để mở rộng...
File dùng Combobox. Test tại sheet Danh sach thi 2.
 

File đính kèm

LuuGiaPhúc đã viết:
Nó chạy chưa đúng lắm bạn ơi, chọn tỉnh nào thì nó cũng ra 1 kiểu
Nhấp chuột vào đây để mở rộng...
Quên chưa xóa dữ liệu cũ. Bạn thay hết code trong sheet1 Danh sach thi đó bằng:
(và tôi nghĩ nên dùng sheet Danh sach thi 2)
Rich (BB code): 
Option Explicit
Option Base 1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.count = 1 Then
    If Target.Row > 5 And Target.Column = 4 Then
        TimHuyen Target.Text
    ElseIf Target.Row > 5 And Target.Column = 5 Then
        TimXa Target.Text
    End If
End If
End Sub

Sub TimHuyen(Tinh As String)
Dim arr, arrR(), i&, k&, Dic As Object

Set Dic = CreateObject("Scripting.Dictionary")
arr = Sheet2.Range("L2:P" & Sheet2.Range("L" & Rows.count).End(xlUp).Row)

For i = 1 To UBound(arr)
    If Not Dic.Exists(arr(i, 3)) And arr(i, 1) = Tinh Then
        k = k + 1
        Dic.Add arr(i, 3), k
        ReDim Preserve arrR(k)
        arrR(k) = arr(i, 3)
    End If
Next
Sheet2.Range("E2").Resize(200, 1).ClearContents
Sheet2.Range("E2").Resize(k, 1) = WorksheetFunction.Transpose(arrR)
End Sub

Sub TimXa(Huyen As String)
Dim arr, arrR(), i&, k&, Dic As Object

Set Dic = CreateObject("Scripting.Dictionary")
arr = Sheet2.Range("N2:P" & Sheet2.Range("L" & Rows.count).End(xlUp).Row)

For i = 1 To UBound(arr)
    If Not Dic.Exists(arr(i, 3)) And arr(i, 1) = Huyen Then
        k = k + 1
        Dic.Add arr(i, 3), k
        ReDim Preserve arrR(k)
        arrR(k) = arr(i, 3)
    End If
Next
Sheet2.Range("F2").Resize(200, 1).ClearContents
Sheet2.Range("F2").Resize(k, 1) = WorksheetFunction.Transpose(arrR)
End Sub
 
Maika8008 đã viết:
Quên chưa xóa dữ liệu cũ. Bạn thay hết code trong sheet1 Danh sach thi đó bằng:
(và tôi nghĩ nên dùng sheet Danh sach thi 2)
Rich (BB code): 
Option Explicit
Option Base 1

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.count = 1 Then
    If Target.Row > 5 And Target.Column = 4 Then
        TimHuyen Target.Text
    ElseIf Target.Row > 5 And Target.Column = 5 Then
        TimXa Target.Text
    End If
End If
End Sub

Sub TimHuyen(Tinh As String)
Dim arr, arrR(), i&, k&, Dic As Object

Set Dic = CreateObject("Scripting.Dictionary")
arr = Sheet2.Range("L2:P" & Sheet2.Range("L" & Rows.count).End(xlUp).Row)

For i = 1 To UBound(arr)
    If Not Dic.Exists(arr(i, 3)) And arr(i, 1) = Tinh Then
        k = k + 1
        Dic.Add arr(i, 3), k
        ReDim Preserve arrR(k)
        arrR(k) = arr(i, 3)
    End If
Next
Sheet2.Range("E2").Resize(200, 1).ClearContents
Sheet2.Range("E2").Resize(k, 1) = WorksheetFunction.Transpose(arrR)
End Sub

Sub TimXa(Huyen As String)
Dim arr, arrR(), i&, k&, Dic As Object

Set Dic = CreateObject("Scripting.Dictionary")
arr = Sheet2.Range("N2:P" & Sheet2.Range("L" & Rows.count).End(xlUp).Row)

For i = 1 To UBound(arr)
    If Not Dic.Exists(arr(i, 3)) And arr(i, 1) = Huyen Then
        k = k + 1
        Dic.Add arr(i, 3), k
        ReDim Preserve arrR(k)
        arrR(k) = arr(i, 3)
    End If
Next
Sheet2.Range("F2").Resize(200, 1).ClearContents
Sheet2.Range("F2").Resize(k, 1) = WorksheetFunction.Transpose(arrR)
End Sub
Nhấp chuột vào đây để mở rộng...
Sheet danh sách thi 2 có lỗi này, click vào bất kỳ ô nào nó cũng báo

1631284217530.png
hoặc bảng này
1631284263152.png
 
LuuGiaPhúc đã viết:
Sheet danh sách thi 2 có lỗi này, click vào bất kỳ ô nào nó cũng báo

View attachment 265828
hoặc bảng này
View attachment 265829
Nhấp chuột vào đây để mở rộng...
Cũng kỳ he. Để tôi xem lại. Nếu không có cái Combobox1 đó thì máy tôi làm sao nó chạy được. Bạn thử:
1/ Ở sheet Danh sach thi 2, vào menu DEVELOPER, nhóm Controls, bấm Design Mode coi cho có hiện cái combobox nào không? Nếu có bấm chọn nó nhìn vào hộp Name Box xem có phải nó tên là Combobox1 không? Có thì sang bước 2. Không có thì tạo mới 1 cái từ nhóm ActiveX
2/ Tại cửa sổ VBA, vào Tools/References xem trong đó có bị Missing XYZ không. Nếu có thì kéo xuống dưới tìm cái tên XYZ bấm chọn nó => OK
Nếu trong cửa sổ đó có đủ thế này mà không chạy thì chắc phải Ultraviewer thôi.
1631284986424.png
 
Lần chỉnh sửa cuối:
Bạn chỉ định userform vào.
Ví dụ:
With Userform1.combobox1
 
LuuGiaPhúc đã viết:
Chào các anh chị trên diễn đàn GPE,
E có 1 file danh sách Tỉnh , Quận , Phường xã như hình bên dưới lưu trong sheet Danh muc tinh thanh,
Em muốn ở sheet Danh sach thi , khi em nhập tên tỉnh thì nó sẽ liệt kê tên quận/huyện ở cột kế bên, tiêp theo, chọn xong quận / huyện thì nó liệt kê Xã / phường.

Tính năng phụ thêm :
Do danh sách quận / huyện / xã phường rất nhiều, nên nếu có thể, dùng VBA để đề xuất sẵn thì càng hay, ví dụ khi nhập chữ Tuyên thì nó sẽ list sẵn Tuyên Quang , khi nhập chữ Huyện Lâm thì nó list sẵn Huyện Lâm Bình. Phần này chỉ là đề xuất thêm nếu có thể làm được thì file sẽ hay hơn, không thì thôi, cho họ click chuột rồi kéo xuống tìm hoặc nhập thủ công cũng được.
Em cảm ơn ạ

View attachment 265796 View attachment 265797
Nhấp chuột vào đây để mở rộng...
Làm cái form nhập liệu có phải vừa nhanh vừa nhẹ file không.
 
Maika8008 đã viết:
Cũng kỳ he. Để tôi xem lại. Nếu không có cái Combobox1 đó thì máy tôi làm sao nó chạy được. Bạn thử:
1/ Ở sheet Danh sach thi 2, vào menu DEVELOPER, nhóm Controls, bấm Design Mode coi cho có hiện cái combobox nào không? Nếu có bấm chọn nó nhìn vào hộp Name Box xem có phải nó tên là Combobox1 không? Có thì sang bước 2. Không có thì tạo mới 1 cái từ nhóm ActiveX
2/ Tại cửa sổ VBA, vào Tools/References xem trong đó có bị Missing XYZ không. Nếu có thì kéo xuống dưới tìm cái tên XYZ bấm chọn nó => OK
Nếu trong cửa sổ đó có đủ thế này mà không chạy thì chắc phải Ultraviewer thôi.
View attachment 265832
Nhấp chuột vào đây để mở rộng...
Lúc đầu thì Em thử trên Laptop với máy bàn đều bị, sau làm như bài này thì ok, nó hoạt động được. Nhưng nếu vậy thì hơi khó khăn chút. vì file này không phải em xài.
Nó như thế này, mỗi 3 ngày là công ty mở 1 kỳ thi, mỗi kỳ thi có khoảng vài chục thí sinh. Trước ngày thi em sẽ gởi file này cho các giáo viên để các giáo viên chuyển cho thí sinh tự điền, điền xong các giáo viên tổng hợp và gởi về cho em để tổng hợp toàn quốc.
Do nhiều thí sinh cứ ghi sai ví dụ có người ghi TPHCM , HCM , Hồ Chí Minh .... nên em phải tạo form này để không sảy ra sai sót.
mà không lẽ phải hướng dẫn cho từng học viên làm như bài #7 thì hơi khó, có cách nào khác không ạ
 
LuuGiaPhúc đã viết:
Lúc đầu thì Em thử trên Laptop với máy bàn đều bị, sau làm như bài này thì ok, nó hoạt động được. Nhưng nếu vậy thì hơi khó khăn chút. vì file này không phải em xài.
Nó như thế này, mỗi 3 ngày là công ty mở 1 kỳ thi, mỗi kỳ thi có khoảng vài chục thí sinh. Trước ngày thi em sẽ gởi file này cho các giáo viên để các giáo viên chuyển cho thí sinh tự điền, điền xong các giáo viên tổng hợp và gởi về cho em để tổng hợp toàn quốc.
Do nhiều thí sinh cứ ghi sai ví dụ có người ghi TPHCM , HCM , Hồ Chí Minh .... nên em phải tạo form này để không sảy ra sai sót.
mà không lẽ phải hướng dẫn cho từng học viên làm như bài #7 thì hơi khó, có cách nào khác không ạ
Nhấp chuột vào đây để mở rộng...
Có lẽ bạn làm 1 cái hướng dẫn bằng hình. Chữ ít, hình đầy đủ từng bước. Gửi file hd đó kèm theo file công việc.

Cũng chỉ có mấy bước chứ mấy, chừng 5-7 cái hình gì đó. Ai cũng làm theo được mà.
 
Maika8008 đã viết:
Có lẽ bạn làm 1 cái hướng dẫn bằng hình. Chữ ít, hình đầy đủ từng bước. Gửi file hd đó kèm theo file công việc.

Cũng chỉ có mấy bước chứ mấy, chừng 5-7 cái hình gì đó. Ai cũng làm theo được mà.
Nhấp chuột vào đây để mở rộng...
Cảm ơn bạn , tạm thời mình đã làm theo cách của bạn, viết 1 file pdf hương dẫn nhúng vào file excel này (insert / object) trong lúc chờ tìm thêm xem có cách nào nữa để tham khảo hay không.
Cảm ơn bạn đã rất nhiệt tình hỗ trợ mình đến tận khuya như vậy.
 
LuuGiaPhúc đã viết:
Cảm ơn bạn , tạm thời mình đã làm theo cách của bạn, viết 1 file pdf hương dẫn nhúng vào file excel này (insert / object) trong lúc chờ tìm thêm xem có cách nào nữa để tham khảo hay không.
Cảm ơn bạn đã rất nhiệt tình hỗ trợ mình đến tận khuya như vậy.
Nhấp chuột vào đây để mở rộng...
Bạn xem lại phần thiết lập Security của Excel xem, có thể bị disable ActiveX nên nó không cho chạy Combobox.
 
ongke0711 đã viết:
Bạn xem lại phần thiết lập Security của Excel xem, có thể bị disable ActiveX nên nó không cho chạy Combobox.
Nhấp chuột vào đây để mở rộng...
Tôi đoán bị trường hợp 2/ ở bài #7 rồi và chủ thớt đã khắc phục rồi. Do đó mới có việc làm hướng dẫn pdf cho người dùng tại bài #17.
 
Maika8008 đã viết:
Tôi đoán bị trường hợp 2/ ở bài #7 rồi và chủ thớt đã khắc phục rồi. Do đó mới có việc làm hướng dẫn pdf cho người dùng tại bài #17.
Nhấp chuột vào đây để mở rộng...
À vì khi tôi disable ActiveX thì nó báo lỗi như trên. Khi bạn thiết kế kéo thả ComboBox ActiveX vô Form thì mặc định nó Embed control vào và cả cái thư viện FM20.dll luôn.
Test trên máy tôi thì có đủ thư viện FM20.dll trong Reference mà vẫn báo lỗi nhé.

Screen Shot 2021-09-11 at 09.21.34.png

Screen Shot 2021-09-11 at 09.27.36.png
 
ongke0711 đã viết:
À vì khi tôi disable ActiveX thì nó báo lỗi như trên. Khi bạn thiết kế kéo thả ComboBox ActiveX vô Form thì mặc định nó Embed control vào và cả cái thư viện FM20.dll luôn.
Test trên máy tôi thì có đủ thư viện FM20.dll trong Reference mà vẫn báo lỗi nhé.

View attachment 265852

View attachment 265854
Nhấp chuột vào đây để mở rộng...
Hôm qua mình có làm như hướng dẫn ở bài #7 và cũng có vào Enable Active X như bạn luôn nên giờ đã được rồi.
Có điều phương án viết file hướng dẫn thì tạm xài được chứ chưa hài lòng 100%, có nhiều học viên lớn tuổi không rành nhiều về ecxel nên mình nghĩ kêu họ chỉnh như hình thì cũng hơi bất tiện, chưa tối ưu lắm.
Sáng giờ ngồi mò mẫm mình mới thay đổi thử cấu trúc bên sheet Tinh_ThanhPho theo 1 hướng khác thì thấy nó ra kết quả cũng gần như giống với mong muốn của mình rồi nè.

1631328184980.png
Kết quả :
1631328323118.png 1631328605302.png

Mình đặt name , rồi ở cột F thì dùng data validation =OFFSET(TinhThanhStart,MATCH(E3,TinhThanhPhoColumn,0)-1,1,COUNTIF(TinhThanhPhoColumn,E3),1)

Cột G dùng Data Validation :
=OFFSET(QuanHuyenStart,MATCH(F3,QuanHuyenColumn,0)-1,1,COUNTIF(QuanHuyenColumn,F3),1)

Phần name thì đặt vậy
1631328917379.png

Làm xong rồi thì thấy phương án Data Validation có 1 thứ chưa hài lòng lắm, đó là do danh sách khá dài nên kéo lên xuống tìm Quận huyện phường xã cũng hơi rối mắt và chưa tiện lắm. Suy nghĩ mãi vẫn chưa có 1 ý tưởng nào tối ưu hơn

Nhớ có 1 lần đọc trên GPE có 1 cách làm mình nghĩ có thể áp dụng được cho trường hợp này, nhưng không nhớ từ khóa nên không tìm ra bài viết đó.
Kiểu làm như vậy nè :
ví dụ cột A chứa 1 danh sách tên phường xã . Ở cột G, khi mình nhập 1 chữ cái bất kỳ, nó sẽ list sẵn 1 danh sách (lấy trong cột A, những ô nào có chữ cái từ bên trái đếm qua giống với chữ cái mình vừa nhập).
Ví dụ : cột F, chọn H. Châu Đức. Cột G, khi mình gõ X. B (tới chữ B thì nó sẽ list ra 1 danh sách :
X. Bàu Chinh
X . Bình Ba
X. Bình Giã
X. Bình Trung

Tới đây, nếu tiếp tục gõ X. Bì (tới chữ ì) thì nó sẽ list ra danh sách
X. Bình Ba
X. Bình Giã
X. Bình Trung
như vậy sẽ ổn và hay hơn
 

File đính kèm

Lần chỉnh sửa cuối:
LuuGiaPhúc đã viết:
Hôm qua mình có làm như hướng dẫn ở bài #7 và cũng có vào Enable Active X như bạn luôn nên giờ đã được rồi.
Có điều phương án viết file hướng dẫn thì tạm xài được chứ chưa hài lòng 100%, có nhiều học viên lớn tuổi không rành nhiều về ecxel nên mình nghĩ kêu họ chỉnh như hình thì cũng hơi bất tiện, chưa tối ưu lắm.
Sáng giờ ngồi mò mẫm mình mới thay đổi thử cấu trúc bên sheet Tinh_ThanhPho theo 1 hướng khác thì thấy nó ra kết quả cũng gần như giống với mong muốn của mình rồi nè.

View attachment 265857
Kết quả :
View attachment 265858 View attachment 265859

Mình đặt name , rồi ở cột F thì dùng data validation =OFFSET(TinhThanhStart,MATCH(E3,TinhThanhPhoColumn,0)-1,1,COUNTIF(TinhThanhPhoColumn,E3),1)

Cột G dùng Data Validation :
=OFFSET(QuanHuyenStart,MATCH(F3,QuanHuyenColumn,0)-1,1,COUNTIF(QuanHuyenColumn,F3),1)

Phần name thì đặt vậy
View attachment 265860

Làm xong rồi thì thấy phương án Data Validation có 1 thứ chưa hài lòng lắm, đó là do danh sách khá dài nên kéo lên xuống tìm Quận huyện phường xã cũng hơi rối mắt và chưa tiện lắm. Suy nghĩ mãi vẫn chưa có 1 ý tưởng nào tối ưu hơn
Nhấp chuột vào đây để mở rộng...
Chỉ có 2 cách VBA hoặc Data Validation thôi. Được này thì mất kia. Mà tôi nghĩ chỉ có dưới 30 huyện (hoặc xã) thì trượt lên xuống tìm cũng đâu khó lắm.
 
Maika8008 đã viết:
Chỉ có 2 cách VBA hoặc Data Validation thôi. Được này thì mất kia. Mà tôi nghĩ chỉ có dưới 30 huyện (hoặc xã) thì trượt lên xuống tìm cũng đâu khó lắm.
Nhấp chuột vào đây để mở rộng...
Dạ, đúng rồi, thật ra đến kết quả như vậy là cũng ok rồi.
Chỉ là mình muốn template nó tối ưu hơn và "hay ho" hơn thêm thôi, nó không quá quan trọng đâu. Vấn đề chính cần thiết nhất đã được giải quyết rồi.
Rất cảm ơn bạn đã nhiều lần hỗ trợ cho mình "tới lúc cuối cùng" luôn, hihihi,
 
Lần chỉnh sửa cuối:
Maika8008 đã viết:
Chỉ có 2 cách VBA hoặc Data Validation thôi. Được này thì mất kia. Mà tôi nghĩ chỉ có dưới 30 huyện (hoặc xã) thì trượt lên xuống tìm cũng đâu khó lắm.
Nhấp chuột vào đây để mở rộng...
Bài này nếu dùng VBA kết hợp Validation có nhập ký tự gợi ý vẫn được ( tuy hơi "Ximachao tý tẹo ), nhưng không rắc rối lắm
Lúc trước, thành viên Ndu có làm 1 bài nhập gợi ý khi dùng Validation mà không xử dụng VBA, lâu quá mình tìm không được
Thân
 
Lần chỉnh sửa cuối:
concogia đã viết:
Bài này nếu dùng VBA kết hợp Validation có nhập ký tự gợi ý vẫn được ( tuy hơi "Ximachao tý tẹo ), nhưng không rắc rối lắm
Lúc trước, thành viên Ndu có làm 1 bài nhập gợi ý khi dùng Validation mà không xử dụng VBA, lâu quá mình tìm không được
Thân
Nhấp chuột vào đây để mở rộng...
Em cũng có ấn tượng là đã từng đọc qua trên GPE về cách làm gợi ý nhập 1 ký tự để tìm 1 chuỗi trong 1 vùng cho sẵn, nhưng search hoài không ra (kể cả google, chắc không biết cách gõ từ khóa). hihihi, có thêm vậy thì nhìn template hay hơn thôi, nên nếu có ai làm thêm được thì quá tốt ạ.
 
Lần chỉnh sửa cuối:
concogia đã viết:
Bài này nếu dùng VBA kết hợp Validation có nhập ký tự gợi ý vẫn được ( tuy hơi "Ximachao tý tẹo ), nhưng không rắc rối lắm
Lúc trước, thành viên Ndu có làm 1 bài nhập gợi ý khi dùng Validation mà không xử dụng VBA, lâu quá mình tìm không được
Thân
Nhấp chuột vào đây để mở rộng...
Bác 'Còn có giá' nên kiến nghị GPE cải thiện khả năng tìm kiếm dùm chút. Tôi đã từng làm cái web cùi bắp mà còn tìm kiếm ngon hơn gấp bội.
 
LuuGiaPhúc đã viết:
Em cũng có ấn tượng là đã từng đọc qua trên GPE về cách làm gợi ý nhập 1 ký tự để tìm 1 chuỗi trong 1 vùng cho sẵn, nhưng search hoài không ra (kể cả google). hihihi, có thêm vậy thì nhìn template hay hơn thôi, nên nếu có ai làm thêm được thì quá tốt ạ.
Nhấp chuột vào đây để mở rộng...
Cách mình giải bài này cũng không hay, khả năng mình tới đó, nhưng nếu bạn thấy xử dụng được thì "chơi", còn không thì ...thôi
Cách nhập:
1) Cột [D] ( thí dụ [D5], Sheet "danh sach thi" nhập từ gợi ý: thí dụ chữ "hà" ==> Enter ==> chọn Nút xổ xuống ở [D5] ==>nó ra 4 thằng "Hà"==> chọn Tỉnh, Thành phố muốn nhập
2) Cell [E5] nhập từ gợi ý: thí dụ "ba" ==> Enter ==> chọn nút xổ xuống ở [E5] ==> nó ra 2 thằng "Ba" ==> chọn Quận, Huyện
3) Cell [F5] Phường tương tự
4) Khi không biết mình ở quận nào thì cứ nhập "quận" nó sẽ show hết quận ( vui thôi, chứ quận mình ở sao mình không biết)
5) Khi lỡ nhập sai, muốn sửa thì nhấn Ctr + W, chon Cell Tỉnh Thành ==> làm lại 3 bước
Dữ liệu nhiều quá, mình không kiểm tra được, bạn thử nhé
Thân
 

File đính kèm

Theo mình nghĩ thì mã xã/phường phải chứa mã của quậng huyện & tỉnh/thành mà nó thuộc về, như được trích ở bảng sau:

Tỉnh Thành PhốMã TPQuận HuyệnMã QHPhường XãMã PX
Thành phố Hà Nội29Quận Ba Đình2901Phường Phúc Xá290101
Thành phố Hà Nội29Quận Ba Đình2901Phường Trúc Bạch290102
Thành phố Hà Nội29Quận Ba Đình2901Phường Vĩnh Phúc290103
Thành phố Hà Nội29Quận Ba Đình2901Phường Cống Vị290104
Thành phố Hà Nội29Quận Ba Đình2901Phường Liễu Giai290105
Thành phố Hà Nội29Quận Ba Đình2901Phường Nguyễn Trung Trực290106
Thành phố Hà Nội29Quận Ba Đình2901Phường Quán Thánh290107
Thành phố Hà Nội29Quận Ba Đình2901Phường Ngọc Hà290108
Thành phố Hà Nội29Quận Ba Đình2901Phường Điện Biên290109
Thành phố Hà Nội29Quận Ba Đình2901Phường Đội Cấn290110
Thành phố Hà Nội29Quận Ba Đình2901Phường Ngọc Khánh290111
Thành phố Hà Nội29Quận Ba Đình2901Phường Kim Mã290112
Thành phố Hà Nội29Quận Ba Đình2901Phường Giảng Võ290113
Thành phố Hà Nội29Quận Ba Đình2901Phường Thành Công290114
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Phúc Tân290201
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Đồng Xuân290202
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Hàng Mã290203
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Hàng Buồm290204
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Hàng Đào290205
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Hàng Bồ290206
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Cửa Đông290207
Thành phố Hà Nội29Quận Hoàn Kiếm2902Phường Lý Thái Tổ290208
 
Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

Bài viết mới nhất

S
Xin hỏi các pro. Em muốn copy các dữ liệu ô họ tên đã bị gộp từ B9 đến E9. Em muốn pass sang ô B9 (sheet mới). (4 người xem)
Trả lời
0
Đọc
4
samthai8017
S
T
  • Question Question
Xin giúp em mã lệnh tổng hợp tự động lên bảng tổng hợp!
Trả lời
1
Đọc
19
Hoàng Tuấn 868
H
T
Nhờ anh chị tìm giúp nguyên nhân không nhảy dữ liệu Pivotable (1 người xem)
Trả lời
0
Đọc
22
thuhacoicoi
T
N
Một ví dụ về XLL add-in: Tương tác với Google Gemini dưới dạng công thức bảng tính
    • Thích
Trả lời
4
Đọc
878
nguyendang95
N
T
  • Question Question
Code VBA tra cứu kết quả trả về mảng dữ liệu
    • Cười
Trả lời
9
Đọc
197
SA_DQ
SA_DQ
Gà Công Nghệ
Nhờ anh chị chuyển hộ font chữ excel
Trả lời
2
Đọc
56
Gà Công Nghệ
Gà Công Nghệ
V
Quản lý xuất nhập vật tư trong kho
Trả lời
19
Đọc
741
LOGANWover
L
phuongnam366377
Học C++ từ số 0 – Bài học đầu tiên (1 người xem)
    • Cảm ơn
Trả lời
4
Đọc
334
phuongnam366377
phuongnam366377
F
Mấy cao thủ giúp dùm mình với. File excel bị lỗi mà mình không biết lỗi chỗ nào để sửa.
Trả lời
2
Đọc
91
firstbood
F
ongke0711
  • Question Question
Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (2 người xem)
    • Thích
    • Yêu thích
    • Cảm ơn
3 4 5
Trả lời
438
Đọc
58K
sát thủ uyên ương
S
X
Làm thế nào để ẩn "Blank" trong Pivot table
    • Thích
Trả lời
15
Đọc
36K
nguyenngochieu761321
nguyenngochieu761321
H
Đánh số thự theo lượt
Trả lời
5
Đọc
139
hongminh_0306
H
D
XIN PHẦN MỀM XẾP TKB TIỂU HỌC BẰNG EXCEL (1 người xem)
Trả lời
2
Đọc
194
danhpheo
D
A
  • Question Question
Copy 2 form sang file khác, có 1 form Show, 1 form không Show
Trả lời
2
Đọc
140
AnhThu-1976
A
R
Các bác có kinh nghiệm excel cho em xin công thức đánh số thứ tự theo ngày tháng này vợi ạ. (1 người xem)
Trả lời
5
Đọc
213
truc.duong87
T
H
Tự động cập nhật dữ liệu từ 2 file word
Trả lời
1
Đọc
156
LOGANWover
L
N
Nhờ giúp Drop down list theo tỉnh xã mới.
Trả lời
7
Đọc
341
ongke0711
ongke0711
E
VBA copy ô trong excel khi đang lọc filter (1 người xem)
Trả lời
8
Đọc
206
eagle12
E
N
Không sử dụng được phím tắt Ctrl + Shift + mũi tên xuống
Trả lời
1
Đọc
3K
aFdangthacmac
A
L
  • Question Question
Gõ và chọn tên trong ComboBox hiển thị giá trị trong textbox
    • Cười
Trả lời
8
Đọc
451
ongke0711
ongke0711
Xem thêm…

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Thời gian đếm ngược.

000
Ngày
00
Giờ
00
phút
00
giây
Thân mời tham dự sự kiện sinh nhật GPE 2025
Back
Top Bottom