Tạo cài đặt cho AddIns

[diemvuongvathuongde]

Chào các bạn trên diễn đàn.
Để bổ sung AddIns cho Excel ta thường làm Tools -> Add-Ins...
Nay tôi có một file AddIns muốn tạo bộ cài đặt để nó bổ sung tự động vào Excel thì phải làm thế nào?
Mong các bạn giúp đỡ.

 

[anhtuan1066]

Hình như ý bạn muốn dùng code VBA đễ cài thì phải... nó như thế này đây:

Sub Cai()
       AddIns.Add Filename:="Đường dẩn\File.xla"
       AddIns("Tên file").Installed = True
End Sub

Còn như copy 1 file từ 1 thư mục nào đó (trên USB chẳng hạn) vào thẳng máy tính thì tôi ko biết dùng code thế nào.. Tôi chỉ biết thực hiện nó bằng file .bat thôi
ANH TUẤN

 

[ongtrungducmx25]

cái này là sau em không hiểu anh tuấn tạo cài đặt addin là sau trong đó có rồi mà

 

[diemvuongvathuongde]

Cảm ơn các bạn.
Ý mình muốn tạo setup.exe, sau khi chạy setup.exe xong thì AddIns được cài vào Excel.

 

[anhtuan1066]

Tức là thay vì vào Tools\Add-Ins.. rồi Browse đến file .xla như mình vẩn thường làm thì chắc bạn muốn bấm 1 phát nó thay thế tất cả thao tác của mình.. Chắc là vậy! Tôi cũng ko rõ lắm, chỉ gợi ý vậy thôi... Còn cụ thể thế nào chắc phải chở bạn ấy lên tiếng thôi..
ANH TUẤN

 

[ongtrungducmx25]

Cảm ơn các bạn.
Ý mình muốn tạo setup.exe, sau khi chạy setup.exe xong thì AddIns được cài vào Excel.

cái này thì khó đấy bạn nhé bạn phải rành về thiết kế phần mềm

 

[anhtuan1066]

Setup đễ cài toàn bộ file XLA vào đúng thư mục Add-Ins thì dễ... nhưng làm sao đễ AddIns("Tên file").Installed = True thì tôi bó tay!

 

[nvson]

Setup đễ cài toàn bộ file XLA vào đúng thư mục Add-Ins thì dễ... nhưng làm sao đễ AddIns("Tên file").Installed = True thì tôi bó tay!

Còn cách này nữa. Chỉ cần khởi động Excel là tự khắc load AddIns:
+Khởi động VB6, nhấn File/ New Project/ chọn Addins ---> Nhấn OK để đóng hộp thoại.
+Nhấn kép chuột vào Designers/ Connect, xuất hiện hộp thoại MyAddIns - Connect.
- Application: Chon MS Excel
- Application version: Chọn phiên bản Excel đang được cài trên máy.
- Initial Load Behavior: Chọn Startup
+Đóng hộp thoại MyAddIns - Connect.
Tiếp theo các bạn có thể Insert Module... để viết code cho ứng dụng của mình.
....
Cuối cùng biên dịch ra file *.dll bằng cách nhấn File/ Make ....dll
+Đóng VB6
+Khởi động Excel xem sao!

 

[Nguyễn Duy Tuân]

Addins trong Excel về cơ bản có 3 laọi
+ XLA - Tạo trong Excel
+ XLL - Tạo trong C , DELPHI
+ DLL - COM Addins, tạo trong VB,C,ELPHI, *.NET...

Việc cài đặt các AddIns cho Excel thì có nhiều cách cũng như nhiều công cụ. Theo tôi chúng ta không nên dùng Excel để làm trình cài đặt AddIns vì không có tính "chủ động" (vẫn chịu ảnh hưởng của "Security warning"), mà nên dùng một chương trình tạo bộ cài đặt hoặc dùng VB6 tạo cho dễ.

 

[diemvuongvathuongde]

mà nên dùng một chương trình tạo bộ cài đặt hoặc dùng VB6 tạo cho dễ.

TuanVNUNI có thể cho một ví dụ cụ thể được không? Cảm ơn nhiều.

 

[Nguyễn Duy Tuân]

TuanVNUNI có thể cho một ví dụ cụ thể được không? Cảm ơn nhiều.

Chiều nay mình sẽ gửi một ví dụ viết trên VB6 (vì giờ phải đi măm rồi).

 

[phamduylong]

Chào các bạn trên diễn đàn.
Để bổ sung AddIns cho Excel ta thường làm Tools -> Add-Ins...
Nay tôi có một file AddIns muốn tạo bộ cài đặt để nó bổ sung tự động vào Excel thì phải làm thế nào?
Mong các bạn giúp đỡ.

Bạn tham khảo ví dụ này:
SetupAddins.xls là tập tin cài addin, MyAddIns.xla là tập tin addin.
Khi chạy SetupAddIns, Sub Autpen sẽ gán MyAddIns vào danh sách AddIn. (2 tập tin này để cùng thư mục, nếu khác bạn phải chỉ rõ đường dẫn)

Private Sub Auto_Open()
On Error GoTo baoloi
AddIns.Add Filename:=ThisWorkbook.Path & "\" & "MyAddIns.xla"
AddIns("MyAddIns").Installed = True
baoloi:
End Sub

dòng On Error GoTo baoloi để khi MyAddIns đã có trong AddIn rồi thì bỏ qua, không gây lỗi.

Còn như copy 1 file từ 1 thư mục nào đó (trên USB chẳng hạn) vào thẳng máy tính thì tôi ko biết dùng code thế nào.. Tôi chỉ biết thực hiện nó bằng file .bat thôi

Code: FileCopy source, destination
Ví dụ FileCopy "H:\Addins.xla", "C:\Addins.xla"

 

[Nguyễn Duy Tuân]

Mình đã viết chương trình cài đặt Addins cho Excel bằng VB6 các bạn tham khảo theo đường link dưới đâu.
http://www.giaiphapexcel.com/forum/showthread.php?p=38137#post38137

 

[vba_gpe]

..... Tôi chỉ biết thực hiện nó bằng file .bat thôi
ANH TUẤN

Anhtuan1066 có thể gửi 1 ví dụ về việc tạo file .bat để tự động cài addin được không?
(khi mở file tên: abc.xls thì sẽ tự động tạo addin abc.xla, khi thoát file đó thì không còn addin này nữa)
Mong nhận được hồi âm.
Trân trọng.

 

[huyphan]

Em có một Add-in, khi cài theo kiểu Tools\ Add-in\ Browser\*.xla thì nó báo lỗi như thế này, các bác giúp em: