Trợ giúp em mã VBA Tỉnh, Huyện, Xã

[luuphong98]

hiện là em đang làm bảng nhập liệu tên khách hàng, em dùng code dùng cho tỉnh:
"Private Sub cb_tinh_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Dim Cll1, Cll2
Dim ws As Worksheet
With Sheets("KHU_VUC")
Set Cll1 = .[A1:A1000].Find(Cb_Tinh.Value, [A1], , 1, , 1)
If Cll1 Is Nothing Then Exit Sub
Set Cll2 = .[A1:A1000].Find(Cb_Tinh.Value, [A1], , 1, , 2)
cb_huyen.RowSource = "KHU_VUC!" & Cll1.Offset(, 1).Address & ":" & Cll2.Offset(, 1).Address
End With
End Sub"

và code cho huyện:
Private Sub cb_huyen_BeforeUpdate(ByVal Cancel As MSForms.ReturnBoolean)
Dim Cll0, Cll3
With Sheets("KHU_VUC")
Set Cll0 = .[B1:B1000].Find(cb_huyen.Value, [B1], , 1, , 1)
If Cll0 Is Nothing Then Exit Sub
Set Cll3 = .[B1:B1000].Find(cb_huyen.Value, [B1], , 1, , 2)
cb_xa.RowSource = "KHU_VUC!" & Cll0.Offset(, 1).Address & ":" & Cll3.Offset(, 1).Address
End With
End Sub

nhưng nó hiện ra lỗi tên huyện trùng rất nhiều !
A/C có cách nào làm cho nó không trùng tên huyện không, mong chỉ giúp ạ!

Download file

 

[batman1]

Rất vui khi được thảo luận tiếp cùng với bạn!

Trên đây là ý tưởng của mình & nó xuất hiện khi có bài của chủ bài đăng này mà thôi.
Tuy nhiên 1 CSDL của 1 CQ luôn phải có [nơi sinh], thậm chí còn có cả [Nguyên Quán], hay [Địa chỉ thường trú],. . . .
Nhưng hoạt động của 1 CSDL tại 1 CQ ít khi phải in ra những trường này.
Nghĩa là mình muốn nói, chủ yếu sẽ là những quá trình
(+) Thay đổi quá trình lương của CNV
(+) Theo dõi & tặng quà sinh nhật
(+) Thay đổi đơn vị hay bộ phận trong CQ, việc chuyển đi & chuyển đến, về hưu hay bỏ việc, buột thôi việc,. . .
(+) Theo dõi lương & thu nhập, thuế TNCN, . . . hàng tháng

Tóm gọn lại là việc cần in lý lịch trích ngang là rất ít so với những hoạt động khác của 1 CSDL trong CQ. Nhất là những đơn vị sản xuất kinh doanh thì điều này càng hãn hữu.
Vậy nẹn mình có ý tưởng này. Mơ ước cũng mình là cái bảng gồm hơn 1100 dòng & 5 cột kia sẽ được đưa ra khỏi CSDL; & chỉ cần nó khi nhập mới 1 NV nào đó vô CSDL hay phải in ra những 'báo cáo' nhất thiết phải có 1 trong các trường đ ịa danh như đã nêu trên.

Trân trọng & xin chào tất cả mọi người.

Tôi hiểu. Nhưng hình như bạn đang lạc đề thì phải. Dữ liệu tỉnh, huyện, xã kia không phải là csdl của cơ quan chủ thớt.

Mà thôi. Tôi dừng ở đây.

 

[luuphong98]

Bạn hãy đọc bài #1 ở link sau để hiểu yêu cầu của chủ thớt và lấy dữ liệu tỉnh, huyện, xã làm cơ sở dữ liệu. Vì hiện thời bạn cũng mới chỉ có tỉnh Bến Tre trong cột A, không có các tỉnh khác. Càng chưa có các huyện, xã cho các tỉnh còn thiếu.

Sau đó đọc bài #15 của tôi để biết tôi xử lý thế nào.

Khi chọn tỉnh trong combobox tỉnh thì trong combobox huyện sẽ chỉ có các huyện trong tỉnh đó. Khi chọn huyện trong combobox huyện thì trong combobox xã chỉ có các xã trong huyện đó.

Nhờ mọi người hỗ trợ điều chỉnh code file quản lý nhân sự

Chào anh/ chị Hiện tại, em có một file quản lý nhân sự bên công ty em. Em có tạo 1 userform dùng để nhập liệu hồ sơ nhân viên nhưng khi nhập liệu gặp phải vấn đề khi nhập liệu địa chỉ hộ khẩu của nhân viên như sau: - Trên userform dùng để nhập liệu em có dùng combobox để tách riêng tỉnh, huyện...

www.giaiphapexcel.com

em cảm ơn và em đã thực hiện được tỉnh huyện xã ! Một lần nữa cảm ơn anh rất nhiều

 

[luuphong98]

Bạn hãy đọc bài #1 ở link sau để hiểu yêu cầu của chủ thớt và lấy dữ liệu tỉnh, huyện, xã làm cơ sở dữ liệu. Vì hiện thời bạn cũng mới chỉ có tỉnh Bến Tre trong cột A, không có các tỉnh khác. Càng chưa có các huyện, xã cho các tỉnh còn thiếu.

Sau đó đọc bài #15 của tôi để biết tôi xử lý thế nào.

Khi chọn tỉnh trong combobox tỉnh thì trong combobox huyện sẽ chỉ có các huyện trong tỉnh đó. Khi chọn huyện trong combobox huyện thì trong combobox xã chỉ có các xã trong huyện đó.

Nhờ mọi người hỗ trợ điều chỉnh code file quản lý nhân sự

Chào anh/ chị Hiện tại, em có một file quản lý nhân sự bên công ty em. Em có tạo 1 userform dùng để nhập liệu hồ sơ nhân viên nhưng khi nhập liệu gặp phải vấn đề khi nhập liệu địa chỉ hộ khẩu của nhân viên như sau: - Trên userform dùng để nhập liệu em có dùng combobox để tách riêng tỉnh, huyện...

www.giaiphapexcel.com

mà em có 1 ý tưởng thêm là khi chọn tỉnh xã xong, sẽ hiện thị danh sách tên của các khách hàng có trong xã đó và khi click vô "tên khách hàng" đó thì "sđt" và "địa chỉ chi tiết" , danh sách "người ký tên công tác" sẽ hiện lên. Vậy đây mình làm giống vậy luôn ah Anh?

 

[SA_DQ]

Từ bài đầu đến giờ bạn chưa đưa file nào lên cả; Vậy thì để chiêm nghiệm ý tưởng ta phải làm sao đây?
À, mình thấy file ở bài đầu; Nhưng chưa biết cách xài , thật tiếc!

 

[batman1]

mà em có 1 ý tưởng thêm là khi chọn tỉnh xã xong, sẽ hiện thị danh sách tên của các khách hàng có trong xã đó và khi click vô "tên khách hàng" đó thì "sđt" và "địa chỉ chi tiết" , danh sách "người ký tên công tác" sẽ hiện lên. Vậy đây mình làm giống vậy luôn ah Anh?

Hiển thị ở đâu? Sẽ hiện lên ở đâu?

Hãy đính kèm tập tin với dữ liệu tỉnh, huyện, xã cùng với code đến thời điểm này. Sau đó dựa vào dữ liệu, các control, hãy mô tả cụ thể, bạn còn muốn gì.

 

[sontrace]

Hi,
Mình gửi bạn file này của mình đã tách, bạn dùng xem đc ko nhé

 

[SA_DQ]

mà em có 1 ý tưởng thêm là khi chọn tỉnh xã xong, sẽ hiện thị danh sách tên của các khách hàng có trong xã đó và khi click vô "tên khách hàng" đó thì "sđt" và "địa chỉ chi tiết" , danh sách "người ký tên công tác" sẽ hiện lên. Vậy đây mình làm giống vậy luôn ah Anh?

Bạn tham khảo fille này & chỉnh sửa lại theo yêu cầu của bạn đi nha, & chúc thành công!

 

[luuphong98]

em lo nghiên cứu quên luôn đây em đã xây dựng lại file và trong sheet index => kê khai hàng ngày em đã làm mọi người thấy gì sai không? chỉ giúp em

 

[SA_DQ]

Mình khỏng thấy gì sai cả trong CSDL của bạn & quả là 1 kỳ công đáng nễ!
Mình chỉ có ý nhỏ góp với bạn thế này xem tham khảo thử:
Tất cả các trang dữ liệu (thô) của bạn đều thiếu cột mã: Mã NV, Mã HH, & mã KH
Với mình các mã này không chứa tiếng Việt có dấu, như Đ, Â, Ô,. . . .
Mình ví dụ:

Mã	Ho & Tên
DAF00	Dương Ái Đông
HJC00	Hồ Châu
NBP00	Nguyễn Bá Phú
NBP01	Ngô Văn Bá Phát
NVN00	Nguyễn Văn Nghĩa
NXL00	Nguyễn Vũ Xà Lượng
TNK00	Trần Thị Ngọc Khang
TSC00	Thạch Sĩ Châu
TTK00	Tô Tử Kha
VVN00	Võ Văn Nhảy

 

[luuphong98]

Mình khỏng thấy gì sai cả trong CSDL của bạn & quả là 1 kỳ công đáng nễ!
Mình chỉ có ý nhỏ góp với bạn thế này xem tham khảo thử:
Tất cả các trang dữ liệu (thô) của bạn đều thiếu cột mã: Mã NV, Mã HH, & mã KH
Với mình các mã này không chứa tiếng Việt có dấu, như Đ, Â, Ô,. . . .
Mình ví dụ:

Mã	Ho & Tên
DAF00	Dương Ái Đông
HJC00	Hồ Châu
NBP00	Nguyễn Bá Phú
NBP01	Ngô Văn Bá Phát
NVN00	Nguyễn Văn Nghĩa
NXL00	Nguyễn Vũ Xà Lượng
TNK00	Trần Thị Ngọc Khang
TSC00	Thạch Sĩ Châu
TTK00	Tô Tử Kha
VVN00	Võ Văn Nhảy

Vâng để em làm thử

 

[dinhthientan]

Bạn tham khảo fille này & chỉnh sửa lại theo yêu cầu của bạn đi nha, & chúc thành công!

Bác cho em hỏi: Nếu muốn chuyển sheet DiaDanh sang một file khác (dạng file dữ liệu), còn file chính cho chạy form thôi thì làm như thế nào ạ. Hay chạy bị lỗi Run-time error 1004'; mặc dù đã set file chính, phụ rồi. E cảm ơn bác

Bài đã được tự động gộp: 28/3/20

Bác cho em hỏi: Nếu muốn chuyển sheet DiaDanh sang một file khác (dạng file dữ liệu), còn file chính cho chạy form thôi thì làm như thế nào ạ. Hay chạy bị lỗi Run-time error 1004'; mặc dù đã set file chính, phụ rồi. E cảm ơn bác

 

[SA_DQ]

Bác cho em hỏi: Nếu muốn chuyển sheet DiaDanh sang một file khác (dạng file dữ liệu), còn file chính cho chạy form thôi thì làm như thế nào ạ. Hay chạy bị lỗi Run-time error 1004'; mặc dù đã set file chính, phụ rồi. E cảm ơn bác

Cái vụ này thì mình không rành lắm & như vậy bạn đành chờ người khác giúp thôi.

 

[SA_DQ]

Bạn xem file này (không chứa Form) có giúp ích được gì cho bạn không (?)

 

[Mr_Fly]

hiện tại mình cũng đang làm đến phần này trên userform với combobox, các bác đi trước chỉ giáo truyền thừa lại cho em với.

 

[SA_DQ]

Bạn cần cụ thể nhất những cái mà bạn cần được 'truyền thừa'
Như: CSDL của bạn đại khái là sao; Bạn cần nhập T-H-X như thế nào (dạng nào) hay xử lý chúng như thế nào để đi đến báo cáo,. . . .

Chúc vui!