Chia sẻ file tổng hợp dữ liệu bằng ADO (1 người xem)

Liên hệ QC

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

hoamattroicoi

Thành viên gắn bó
Thành viên BQT
Moderator
Tham gia
19/12/10
Bài viết
2,587
Được thích
5,774
Nghề nghiệp
Công nhân vệ sinh số liệu
Rất bất ngờ vì năm nay tôi có nhận được một món quà sinh nhật của một người bạn qua Email là 1 file Excel tổng hợp dữ liệu từ 1 hoặc nhiều file được viết bằng ADO trình bày khá cẩn thận và công phu. Một chủ đề không mới nhưng tôi hy vọng món quà nhỏ này của bạn tôi có thể giúp đỡ được thành viên nào đang có nhu cầu tương tự hoặc muốn tham khảo, chế biến code để phù hợp với công việc của mình.
 

File đính kèm

Trong file có hướng dẫn sử dụng ko e?
Vì đang mở bằng đt nên ko xem đc.
Cảm ơn món quà sn của ai đó...
Làm mình liên tưởng đến lời bài "bài hát cho em giờ đã hát cho mọi người... để rồi lãng quên"
Giờ chế đi tí " đoạn cốt cho em giờ đã pắp cho mọi người... để rồi.... có quên???"
Ps: chúc cả nhà ngủ ngon
 
Upvote 0
Rất bất ngờ vì năm nay tôi có nhận được một món quà sinh nhật của một người bạn qua Email là 1 file Excel tổng hợp dữ liệu từ 1 hoặc nhiều file được viết bằng ADO trình bày khá cẩn thận và công phu. Một chủ đề không mới nhưng tôi hy vọng món quà nhỏ này của bạn tôi có thể giúp đỡ được thành viên nào đang có nhu cầu tương tự hoặc muốn tham khảo, chế biến code để phù hợp với công việc của mình.


File hay và đẹp quá, "gato" với bạn thật

File có đầy đủ kiển thức từ ADO đến Form, đến Class khủng, mà vẫn thực dụng có thể cho cá nhân hóa chuối SQL thật tuyệt vời.

Đúng là bạn và bạn của bạn thật là sư phụ của sư phụ... hichic nếu được tin nhắn cho tôi thông tin người bạn đó đi, tôi muốn bái sư (chắc ở Hải phòng luôn đây) để tôi được học hỏi, hoặc xin tài liệu. Cám ơn nhiều.
 
Upvote 0
File hay và đẹp quá, "gato" với bạn thật

File có đầy đủ kiển thức từ ADO đến Form, đến Class khủng, mà vẫn thực dụng có thể cho cá nhân hóa chuối SQL thật tuyệt vời.

Đúng là bạn và bạn của bạn thật là sư phụ của sư phụ... hichic nếu được tin nhắn cho tôi thông tin người bạn đó đi, tôi muốn bái sư (chắc ở Hải phòng luôn đây) để tôi được học hỏi, hoặc xin tài liệu. Cám ơn nhiều.

File Tuyệt vời nhưng mình chưa dành chức năng khi mở Form lên lắm Ai dành chỉ dùm (Hình Kèm)
Thanks hoamattroicoi rất nhiều đã chia sẽ
Xin cảm Ơn
 

File đính kèm

  • 2014-08-26_19-33-53.jpg
    2014-08-26_19-33-53.jpg
    58.6 KB · Đọc: 159
Upvote 0
Rất bất ngờ vì năm nay tôi có nhận được một món quà sinh nhật của một người bạn qua Email là 1 file Excel tổng hợp dữ liệu từ 1 hoặc nhiều file được viết bằng ADO trình bày khá cẩn thận và công phu. Một chủ đề không mới nhưng tôi hy vọng món quà nhỏ này của bạn tôi có thể giúp đỡ được thành viên nào đang có nhu cầu tương tự hoặc muốn tham khảo, chế biến code để phù hợp với công việc của mình.
Cảm ơn bạn đã chia sẻ!
 
Upvote 0
File Tuyệt vời nhưng mình chưa dành chức năng khi mở Form lên lắm Ai dành chỉ dùm (Hình Kèm)
Khi sử dụng các chức năng trên FORM anh sẽ thấy nó cho phép Tổng hợp dữ liệu từ nhiều Sheet trên Workbook hiện hành nếu anh chọn In Active (Current) Workbook hoặc từ nhiều file nếu anh tích chọn In other files that will be selected later trong mục Where does Location of data?

- Mục Header cũng có 2 lựa chọn là sử dụng tiêu đề cột hoặc không, khi không sử dụng tiêu đề cột anh phải thay đổi câu lệnh SQL cho phù hợp, ví dụ trong trường hợp không sử dụng tiêu đề cột (khi tiêu đề cột là tiếng việt) với yêu cầu tổng hợp dữ liệu từ nhiều file thì câu lệnh SQL sẽ phải là : SELECT * FROM [$A2:D65536] WHERE YEAR([f4]) = 2014
A1 của vùng dữ liệu chứa tiêu đề nên bỏ qua ta bắt đầu từ A2 và tiêu đề cột dữ liệu sẽ thay bằng f1, f2, f3, f4 và f4 chính là cột chứa dữ liệu ngày tháng để lọc theo điều kiện đã cho.
- Về mục Enter String SQL anh có thể sửa câu lệnh trực tiếp trong đó hoặc đặt câu lệnh trên Sheet, trước khi chạy FORM thì đặt con trỏ tại ô chứa câu lệnh đó thì nó tự load lên FORM. Câu lệnh về SQL anh có thể tham khảo trên GPE TOPIC của anh Hai Lúa Miền Tây đề cập rất nhiều hoặc xem tại link này :
http://www.w3schools.com/sql/sql_where.asp
- Mục Select Cell Fill Result : Cho phép anh đặt kết quả lọc tại ô được chỉ định của Workbook hiện hành, nếu bỏ qua nó sẽ bắt đầu từ A2 của Worbook mới.
- Mục Add name data file to result : tích nếu muốn hiển thị thêm tên file được lấy dữ liệu sau khi tổng hợp.

Tóm lại để ứng dụng file tốt anh nên tìm hiểu thêm một chút về ADO nhé để biến tấu cho phù hợp với yêu cầu. Anh có thể chạy thử với câu lệnh em để trong file này.
 

File đính kèm

Upvote 0
Cho em hỏi về load form lên với. em chuyển file sang office2003 thì không load lên được là sao anh (chị) nhỉ? nó báo can't find project or library. click vào ADO-lấy dữ liệu... thì cũng báo tương tự. chạy trên off2007 hoặc off2010 thì ok vậy là thiếu gì phải không ạ?
 
Lần chỉnh sửa cuối:
Upvote 0
Có ai zúp với hong? em load mà vẫn không lên.
 
Lần chỉnh sửa cuối:
Upvote 0
Em tìm trong references để tìm thư viện bổ sung mà không biết phải bổ sung cái nào? nhờ các anh chị chỉ giúp, nó báo ngay dòng if Ucase(....
Private Sub UserForm_Initialize()
If UCase(ActiveCell.Value) Like "SELECT*" Then
txbSQL.Text = ActiveCell.Value
Else
txbSQL.Text = "SELECT * FROM [$A1:....] WHERE ...... "
End If
End Sub
 
Lần chỉnh sửa cuối:
Upvote 0

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

Back
Top Bottom