Ứng dụng kiểm tra doanh nghiệp

[evenking]

Em có ý tưởng về ứng dụng như file đính kèm.
File này hoàn toàn chạy bằng Excel sử dụng để kiểm tra doanh nghiệp và lưu lại dữ liệu thống nhất
Tuy nhiên trong quá trình làm em còn một số hạn chế như sau (mong các anh chị góp ý để em chỉnh sửa thêm)
- Code dài trùng lặp em chưa biết viết gọn thế nào
- Msgbox không hiện được tiếng việt
- Các thông báo vẫn còn thanh title của window em chưa biết cách ẩn đi
Em đăng lên đây nhờ các anh chị chỉ dẫn thêm để em hoàn thiện ạ

 

[vanaccex]

Em có ý tưởng về ứng dụng như file đính kèm.
File này hoàn toàn chạy bằng Excel sử dụng để kiểm tra doanh nghiệp và lưu lại dữ liệu thống nhất
Tuy nhiên trong quá trình làm em còn một số hạn chế như sau (mong các anh chị góp ý để em chỉnh sửa thêm)
- Code dài trùng lặp em chưa biết viết gọn thế nào
- Lỗi nhiều nhưng cũng không biết sửa
Em đăng lên đây nhờ các anh chị chỉ dẫn thêm để em hoàn thiện ạ

Bạn làm kỳ công thật nhưng cũng không biết xem thế nào luôn

 

[evenking]

Bạn làm kỳ công thật nhưng cũng không biết xem thế nào luôn

Em có mấy vấn đề cần giải quyết là:
- Msgbox không hiện được tiếng việt
- Dữ liệu ngày khi cập nhật usform QDTT bị lỗi (vì em làm code tìm giá trị lớn nhất trong danh sách ngày, nhưng danh sách chứa dữ liệu ở bảng excel lại ở dạng text ) mà chưa biết cách sửa
- Các thông báo vẫn còn thanh title của window em chưa biết cách ẩn đi
- Tại USerform: usfHSPL việc tính tổng các textbox1 - textbox8 em nghĩ là dùng classmodule đc mà không biêt viết code ra sao
Mong các anh chị giúp đỡ ạ

 

[babyheomoi]

Theo ý kiến của mình:
Hiện tại, theo mình biết, thì dữ liệu HDTD và HDTC sẽ cần nhiều chi tiết hơn thế này.
Các NH hiện cũng có thể xuất file chi tiết cho từng loại TSĐB và HDTD, bạn làm file này mục đích để theo dõi riêng bạn hả?

 

[evenking]

Theo ý kiến của mình:
Hiện tại, theo mình biết, thì dữ liệu HDTD và HDTC sẽ cần nhiều chi tiết hơn thế này.
Các NH hiện cũng có thể xuất file chi tiết cho từng loại TSĐB và HDTD, bạn làm file này mục đích để theo dõi riêng bạn hả?

Dạ, cũng có một phần là để phục vụ lưu giữ. Phần khác là em muốn thống nhất cách thức thu thập dữ liệu giữa nhiều người dùng khác nhau. Nên chỉ cần những nội dung chính, còn việc chi tiết sâu quá thì lại không cần thiết.

 

[vanaccex]

Em có mấy vấn đề cần giải quyết là:
- Msgbox không hiện được tiếng việt
- Dữ liệu ngày khi cập nhật usform QDTT bị lỗi (vì em làm code tìm giá trị lớn nhất trong danh sách ngày, nhưng danh sách chứa dữ liệu ở bảng excel lại ở dạng text ) mà chưa biết cách sửa
- Các thông báo vẫn còn thanh title của window em chưa biết cách ẩn đi
- Tại USerform: usfHSPL việc tính tổng các textbox1 - textbox8 em nghĩ là dùng classmodule đc mà không biêt viết code ra sao
Mong các anh chị giúp đỡ ạ

Cái này trên diễn đàn có nhiều bài về msgbox có tiếng việt. Còn phần code thì phải xem kết quả mong muốn

 

[evenking]

Cái này trên diễn đàn có nhiều bài về msgbox có tiếng việt. Còn phần code thì phải xem kết quả mong muốn

Cám ơn anh, sau một thời gian tìm kiếm thì em đã hoàn thiện file dần dần. Nhưng vẫn còn một số thắc mắc, để đơn giản em chia nhỏ file và xin hỏi từng cái ạ.
Ở file này, em thấy nó bị lỗi như sau.
- Khi chuyển từ Userform Màn hình chính (UsfMHChinh) sang User form Màn hình kiểm tra (UsfMHKT) file chay bình thường
- Khi tắt UsfMHKT để quay lại UsfMHChinh thì bị đơ. Chỉ khi nào di chuột vào khu vực Listbox thì mới hết đơ
Vậy em xin hỏi nguyên nhân và cách chữa thế nào ạ

 

[evenking]

Đây là file em mới cập nhật ạ

 

[evenking]

Em xin trợ giúp với ạ

 

[vanaccex]

Bạn làm kỳ công quá mà Tớ không biết dùng sao nên không check được. Làm File kiểm tra doanh nghiệp này thì mỗi doanh nghiệp 1 kiểu dữ liệu, ngoài ra mục đích kiểm tra lại khác nhau. Nếu có thể bạn Làm thành từng File hoặc tạo ra các Functuon kiểm tra riêng cho phù hợp

 

[huuthang_bd]

Em xin trợ giúp với ạ

Bị gì bạn?

 

[evenking]

Bị gì bạn?

Lỗi em đã nêu ở bài #7, đại khái là nó bị đơ khi chay listbox, và em vẫn chưa giải quyết được mong anh chị giúp đỡ. Em cảm ơn

 

[evenking]

Bạn làm kỳ công quá mà Tớ không biết dùng sao nên không check được. Làm File kiểm tra doanh nghiệp này thì mỗi doanh nghiệp 1 kiểu dữ liệu, ngoài ra mục đích kiểm tra lại khác nhau. Nếu có thể bạn Làm thành từng File hoặc tạo ra các Functuon kiểm tra riêng cho phù hợp

Em không muốn tách làm nhiều file vì như vậy sẽ rất khó khăn cho người dùng, vì không phải ai cũng biết rõ về excel. Em muốn nó phải thật sự tối giản, tiện dụng, hỗ trợ khá trong việc thu thập dữ liệu và tổng hợp dữ liệu một cách khoa học

 

[huuthang_bd]

Lỗi em đã nêu ở bài #7, đại khái là nó bị đơ khi chay listbox, và em vẫn chưa giải quyết được mong anh chị giúp đỡ. Em cảm ơn

Bạn phải mô tả các bước thao tác như thế nào, hiện tượng như thế nào chứ nói vậy sao biết được.

 

[evenking]

Bạn phải mô tả các bước thao tác như thế nào, hiện tượng như thế nào chứ nói vậy sao biết được.

- Đầu tiên với Userform màn hình chính cho phép tìm kiếm từ Textbox và hiện ra danh sách doanh nghiệp trên Listbox. Bước này chạy ổn
- Sau khi Double click chọn một doanh nghiệp có tên trong listbox thì hiện ra userform mới là Userform kiểm tra. Bước này chạy cũng ổn
- Khi tắt UsfMHKT để quay lại UsfMHChinh bằng nút thoát (em gán lệnh unload me) thì userform MHKT thoát được. Vẫn ổn
- Nhưng userform Màn hình chính bị đơ, không click chuột chọn nút thoát được, Chỉ khi nào di chuột vào khu vực Listbox thì mới có thể thực hiện thao tác khác
Vậy em xin hỏi nguyên nhân và cách chữa thế nào ạ

 

[huuthang_bd]

- Đầu tiên với Userform màn hình chính cho phép tìm kiếm từ Textbox và hiện ra danh sách doanh nghiệp trên Listbox. Bước này chạy ổn
- Sau khi Double click chọn một doanh nghiệp có tên trong listbox thì hiện ra userform mới là Userform kiểm tra. Bước này chạy cũng ổn
- Khi tắt UsfMHKT để quay lại UsfMHChinh bằng nút thoát (em gán lệnh unload me) thì userform MHKT thoát được. Vẫn ổn
- Nhưng userform Màn hình chính bị đơ, không click chuột chọn nút thoát được, Chỉ khi nào di chuột vào khu vực Listbox thì mới có thể thực hiện thao tác khác
Vậy em xin hỏi nguyên nhân và cách chữa thế nào ạ

Vấn đề nằm ở đây

UsfMHChinh.TxtTenPN = TenPN