Add-ins SQL VB6 cho Excel, Access Và SQL Server + TCPIP

Liên hệ QC

Kiều Mạnh

I don't program, I beat code into submission!!!
Tham gia
9/6/12
Bài viết
5,421
Được thích
4,032
Giới tính
Nam
Mạnh thấy Trên GPE có hướng dẫn viết nhiều Add- ins cho Excel ....
Nên Mạnh cũng mày mò làm 1 cái Trên VB6 cho Vui chủ yếu sử dụng và Úp cho ai đó cần xài nếu thấy tiện ích !!!

I/ SQL cho Access và Excel ( Lấy dữ liệu File Excel và Access bất kỳ từ Excel 2003 To 2019 và Access *.mdb To *.accdb )

1/ Bấm vào SQL String Database là nổi lên cái Form ta có thể lấy dữ liệu File Excel và Access ( SheetName Or Tablename ) lên Sheet Ok
2/ Mục Get SQL String Database ta có thể thêm tùy chọn lấy dữ liệu vào đó ...
3/ Range Target mặc định là A1 nếu thích thay đổi gõ vào đó là Cells gán dữ liệu ...
4/ Get Tile là lấy có tiêu đề hay ko tiêu đề

II/ Mạnh Copy cái Form của @ongke0711 bài 15 cho vào VB6 và chỉnh sửa lại chút cho phù hợp và dễ xài hơn một chút ( có thời gian sẻ thêm nhiều thứ vào đó nữa )

Xin cảm Ơn @ongke0711 rất nhiều viết cái Form hay ... Mạnh Copy và điều chỉnh lại chút cho vào Add-Ins VB6 Thành công

III/ Mô hình Server + Client sẻ viết sau ... đại ý nó tương tự như cái SQL Access và Excel ( Còn lỗi nhiều thứ Fix ok Úp sau )

Làm phiền các Bạn ai rảnh test dùm có lỗi thì báo để Mạnh Fix lại

Xin cảm ơn
Get SQL.png

Video cài đặt và sử dụng
1/ Trên Windows10 gõ vào Hộp Tìm kiếm chữ Excel ==> Tìm File Excel.EXE xong Chuột Phải vào nó chạy Run As khi đó Windows sẻ hỏi thì Bạn thì Bạn chọn Yes

2/ Khi Excel mở lên Vào COM Add-Ins\Add... chọn File VBLibrary.exe\Ok xong ... nhìn thấy Nó check ExcelTools\Ok thêm lần nữa

3/ Hay Xem video Sau

Lưu Ý:
1/ File VBLibrary_Test.rar Ở bài số #1 này chỉ Áp dụng chạy trên máy tính có cài đặt VB6
2/ Nếu Máy Bạn nào chưa cài VB6 thì tải file SQLDatabase.rar
3/ File SQLDatabase.rar là 1 Tools chạy độc lập ko có Menu Ribbon Excel và không Phải đăng ký sử dụng
4/ Có thời gian Mạnh sẻ viết lại hết 1 File duy nhất chạy chung cho tất cả các máy Vui lòng xin chờ he ....
 

File đính kèm

  • VBLibrary_Test.rar
    5.2 MB · Đọc: 60
  • SQLDatabase.rar
    30.9 KB · Đọc: 69
Lần chỉnh sửa cuối:
Thấy 9 lần tải tới thời điểm hiện tại mà chưa thấy Bạn nào ý kiếm gì .... Ko biết nó có chạy tốt trên máy ko cài VB6 không nữa ???
Nếu máy Bạn nào không cài VB6 mà chạy thử Ok ... báo Mình với
Xin cảm ơn
 
Thấy 9 lần tải tới thời điểm hiện tại mà chưa thấy Bạn nào ý kiếm gì .... Ko biết nó có chạy tốt trên máy ko cài VB6 không nữa ???
Nếu máy Bạn nào không cài VB6 mà chạy thử Ok ... báo Mình với
Xin cảm ơn
Máy mình khi kéo file để đăng ký xuất hiện lỗi như hình, khi bấm Ok thì báo đăng ký thành công. Nhưng khi mở Excel thì vẫn không thấy xuất hiện trên Ribbon
1.png
 
Mình cũng bị lỗi tương tự (win 8.1)
 
Mạnh thấy Trên GPE có hướng dẫn viết nhiều Add- ins cho Excel ....
Nên Mạnh cũng mày mò làm 1 cái Trên VB6 cho Vui chủ yếu sử dụng và Úp cho ai đó cần xài nếu thấy tiện ích !!!

I/ SQL cho Access và Excel ( Lấy dữ liệu File bất kỳ từ Excel 2003 To 2019 và Access *.mdb To *.accdb )

1/ Bấm vào SQL String Database là nổi lên cái Form ta có thể lấy dữ liệu File Excel và Access ( SheetName Or Tablename ) lên Sheet Ok
2/ Mục get SQL String Database ta có thể thêm tùy chọn lấy dữ liệu vào đó ...
3/ Range Target mặc định là A1 nếu thích thay đổi gõ vào đó là Cells gán dữ liệu...
4/ Get Tile là lấy có tiêu đề hay ko tiêu đề
.....

II/ Mạnh Copy cái Form của @ongke0711 bài 15 cho vào VB6 và chỉnh sửa lại chút cho phù hợp và dễ xài hơn một chút ( có thời gian sẻ thêm nhiều thứ vào đó nữa )

Xin cảm Ơn @ongke0711 rất nhiều viết cái Form hay ... Mạnh Copy và điều chỉnh lại chút cho vào Add-Ins VB6 Thành công

III/ Mô hình Server + Client sẻ viết sau ... đại ý nó tương tự như cái SQL Access và Excel ( Còn lỗi nhiều thứ Fix ok Úp sau )

Làm phiền các Bạn ai rảnh test dùm có lỗi thì báo để Mạnh Fix lại

Xin cảm ơn
View attachment 239173
Hay quá. Mình cần công cụ như thế này lắm. Sẽ test và thông báo kết quả.
 
Máy mình khi kéo file để đăng ký xuất hiện lỗi như hình, khi bấm Ok thì báo đăng ký thành công. Nhưng khi mở Excel thì vẫn không thấy xuất hiện trên Ribbon
View attachment 239189
Bạn thử lại như sau:
1/ Trên Windows10 gõ vào Hộp Tìm kiếm chữ Excel ==> Tìm Excel.EXE xong Chuột Phải vào nó chạy Run As khi đó Windows sẻ hỏi thì Bạn thì Bạn chọn Yes xong làm như hình sau
Vào COM Add-Ins\Add... chọn File VBLibrary.exe\Ok xong ... nhìn thấy Nó check ExcelTools\Ok thêm lần nữa
11.png

2/ Sau khi chọn Ok thì nó báo như hình sau
222.png
chọn Ok thêm lần nữa ... nếu gỡ bỏ nó thì vào lại COM Add-Ins ==> Chọn Nó xong Chọn Remove ==> Ok là xong

Lưu ý: Nếu thay đổi dường dẫn File VBLibrary,exe là phải đăng ký lại và File VBLibrary,exe ko để trong Folder là Tiếng Việt có dấu

Hoặc Bạn Có thể xem Video sau
 

File đính kèm

  • Video_2020-06-13_080007.rar
    5.1 MB · Đọc: 19
Lần chỉnh sửa cuối:
Bạn gắng chuyển qua Delphi để xuất DLL ra 32 và 64 bit. Hiện nay VB6 chỉ 32 bit nên nhiều bạn sẽ gặp lỗi trên Office 32 bit.
 
Bạn gắng chuyển qua Delphi để xuất DLL ra 32 và 64 bit. Hiện nay VB6 chỉ 32 bit nên nhiều bạn sẽ gặp lỗi trên Office 32 bit.
Cái đích hướng tới nó là như vậy ... ban đầu Mạnh mò code thì phải mò trên VB6 cho nó hiểu và biết cách thức code Ok cái đã mọi thứ xong chuyển qua Delphi nữa là xong ... Vì Code trên Delphi Mạnh còn hạn chế nhiều thứ hơn VBA và VB6
Cảm ơn Bạn
 
Có thể dùng VB.Net hoặc C#. Nó có thư viện hỗ trợ viết plugin cho office sẵn luôn.
 
chạy trên Officex64 thấy OK .. còn lỗi trên Officex32 ... vài ngày nữa rảnh Mạnh Fix sau
đang nghi ngờ check mấy cái Thư viện của Officex64 ... nên lỗi 1 vài cái trên Officex32
 
Rảnh mới chỉnh sửa lại chút cho Nó lấy File trong Folder là Tiếng Việt có dấu và tên File cũng là tiếng Việt có dấu đấy
Mới Úp lại File bài 1 Bạn nào iU thì cứ thế tải về dùng thôi he
giao diện mới cho SQL Access và Excel như sau
Rảnh sẻ làm tiếp nhiều thứ nữa ....

Untitled.png
 
Bạn thử lại như sau:
1/ Trên Windows10 gõ vào Hộp Tìm kiếm chữ Excel ==> Tìm Excel.EXE xong Chuột Phải vào nó chạy Run As khi đó Windows sẻ hỏi thì Bạn thì Bạn chọn Yes xong làm như hình sau
Vào COM Add-Ins\Add... chọn File VBLibrary.exe\Ok xong ... nhìn thấy Nó check ExcelTools\Ok thêm lần nữa
View attachment 239194

2/ Sau khi chọn Ok thì nó báo như hình sau
View attachment 239195
chọn Ok thêm lần nữa ... nếu gỡ bỏ nó thì vào lại COM Add-Ins ==> Chọn Nó xong Chọn Remove ==> Ok là xong

Lưu ý: Nếu thay đổi dường dẫn File VBLibrary,exe là phải đăng ký lại và File VBLibrary,exe ko để trong Folder là Tiếng Việt có dấu

Hoặc Bạn Có thể xem Video sau
Mình làm theo hướng dẫn nhưng vẫn bị lỗi
1592289300681.png




Mình đang dùng bản Office này + Win 10 (64bit)
1592289349573.png
 
To huuduy.duy

1/ Khi Mình mở File Excel lên Bình thường thử Đăng ký thì nó cũng báo lỗi như bạn
Error.png

2/ Khi Mình mở File Excel.EXE đăng ký thì Ok ( Lưu ý File Excel.EXE )
Thực hiện như bài 1 ấy


3/ Trên Windows10 gõ vào Hộp Tìm kiếm chữ Excel ==> Tìm Excel.EXE xong Chuột Phải vào nó chạy Run As khi đó Windows sẻ hỏi thì Bạn thì Bạn chọn Yes xong
4/ Khi File Excel mở lên thì làm theo hướng dẫn bài 1 hay bài 7
 
Lần chỉnh sửa cuối:
Bạn chạy excel với quyền Admin ấy run as xong chọn file Addin mới okXong khi quyền đòi hỏi thì chọn yes
Tôi dùng Win10 64bit, Office 2013 32bit. Tôi đã chạy Excel với quyền Admin nhưng khi add Add-Ins:
- Với file VBLibrary.exe thì bị lỗi như hình của bạn ở trên.
- Với file VBLibrary.dll thì nó im re, chẳng hiện ra cái gì trong hộp thoại COM Add-Ins đó.
 
Chịu chắc ít ngày nữa Mạnh Ghost lại cái máy kia ko cài VB6 xem sao xong test thử mới biết được
Rất nghi khả năng là máy ko cài VB6 là tịt quá :D :p
 
To @huuduy.duy@Maika8008 + ...
Mình mới thử lại trên máy không cài VB6 là tịt toàn tập vì nó có liên quan tới mấy thư viện của VB6 .... quá phiền phức nên Mình bỏ Menu Ribbon
Mà viết thành 1 Tools chạy độc lập ko có Menu Ribbon Excel và ko phải đăng ký

Hướng dẫn sử dụng
1/ Mở 1 file Excel bất kỳ lên ( File mới hay gì đó tùy )
2/ Mở Tools SQLDatabase.exe lên chạy code chon File Excel Or Access
3/ Tùy chọn lấy dữ liệu như các bài trên
4/ Vui lòng Tải File ở bài Số # 1 Mình mới Úp lại
 
Lần chỉnh sửa cuối:
To @huuduy.duy@Maika8008 + ...
Mình mới thử lại trên máy không cài VB6 là tịt toàn tập vì nó có liên quan tới mấy thư viện của VB6 .... quá phiền phức nên Mình bỏ Menu Ribbon
Mà viết thành 1 Tools chạy độc lập ko có Menu Ribbon Excel và ko phải đăng ký

Hướng dẫn sử dụng
1/ Mở 1 file Excel bất kỳ lên ( File mới hay gì đó tùy )
2/ Mở Tools SQLDatabase.exe lên chạy code chon File Excel Or Access
3/ Tùy chọn lấy dữ liệu như các bài trên
4/ nếu ko mở Office Excel lên Trước là báo Lỗi ( Mình sẻ bổ sung sau nếu chưa mở thì Mở nó lên ... xem xét sau )
5/ Có lỗi gì báo lại xin cảm ơn
Chạy thử OK, không lỗi gì. Cảm ơn nhiều!
 
Hi em,
Lỗi gì quá trời à. Thôi giờ VB6 hết thời rồi chuyển qua Delphi. Delphi công nhận GOOD vì đôi khi viết các phiên bản cũ lắm giờ vẫn chạy ngon lành à.

Lê Văn Duyệt
 
Web KT
Back
Top Bottom