Tìm tool hoặc code vba để cài addin excel

[YêuCN]

Cho mình hỏi có tool hoặc code vba nào có thể:
-Cài hoặc gỡ một lúc 1 hoặc nhiều addin trong excel không ?
Ghi chú:
-Cài các file addin trong cùng thư mục.
-Các addin đuôi xla,xlam,xll

 

[huhumalu]

Cho mình hỏi có tool hoặc code vba nào có thể:
-Cài hoặc gỡ một lúc 1 hoặc nhiều addin trong excel không ?
Ghi chú:
-Cài các file addin trong cùng thư mục.
-Các addin đuôi xla,xlam,xll

    AddIns.Add Filename:="Đường dẫn > Tên Add-in.xla"
    AddIns("Tên Add-in").Installed = True 'False

Bạn tìm hiểu thử theo cách trên.
Xem thêm link : AddIns.Add method (Excel)

 

[YêuCN]

Nếu file chưa add vào mục Add-ins trong tab developer thì code trên chạy không được bạn !

 

[huhumalu]

Sub UseAddIn()
    Path = "D:\AddIn\ChuHoaThuong.xla"
    Set myAddIn = AddIns.Add(Filename:=Path)
    NameAddin = myAddIn.Title
    AddIns(NameAddin).Installed = True 'False
End Sub

Sao bạn không tự thử nhỉ ?

 

[giaiphap]

Nếu file chưa add vào mục Add-ins trong tab developer thì code trên chạy không được bạn !

Vẫn được mà bạn. Thử thế này xem sao.

AddIns.Add("D:/FileAdd_Ins.xlam", True).Installed = True

 

[YêuCN]

Vẫn được mà bạn. Thử thế này xem sao.

AddIns.Add("D:/FileAdd_Ins.xlam", True).Installed = True

Để coi cách này thử

Bài đã được tự động gộp: 10/8/22

Sub UseAddIn()
    Path = "D:\AddIn\ChuHoaThuong.xla"
    Set myAddIn = AddIns.Add(Filename:=Path)
    NameAddin = myAddIn.Title
    AddIns(NameAddin).Installed = True 'False
End Sub

Sao bạn không tự thử nhỉ ?

Có thử rồi bạn mà không biết sao không được.

 

[huhumalu]

Để coi cách này thử

Bài đã được tự động gộp: 10/8/22

Có thử rồi bạn mà không biết sao không được.

Bạn đưa cái không được để mọi người xem giúp cho. Mình đã test thử và ổn thì mới đưa lên cho bạn.
Cái của @giaiphap và mình chả khác gì nhau.
Mình đoán là đường dẫn hoặc tên add-in của bạn có dính đến tiếng Việt.

 

[Nhattanktnn]

Để coi cách này thử

Cũng một câu nói, sao không “cảm ơn bạn đã giúp đỡ, để mình thử xem sao”. Nên tỏ thái độ biết ơn!

 

[YêuCN]

@giaiphap nhờ bác xem giúp em !

 

[huhumalu]

@giaiphap nhờ bác xem giúp em !

Nói sao được nhỉ ?

Sub UseAddIn()
    Path = "D:\AddIn\ChuHoaThuong.xla"
    Set myAddIn = AddIns.Add(Filename:=Path)
    NameAddin = myAddIn.Title
    AddIns(NameAddin).Installed = True 'False
End Sub

Sao bạn không tự thử nhỉ ?

Đành dùng từ "Cạn lời"

 

[YêuCN]

View attachment 279812
Nói sao được nhỉ ?

Đành dùng từ "Cạn lời"

Là sao bác mình dùng code tương tự bác mà cũng không được mà !!!!!

 

[YêuCN]

View attachment 279812
Nói sao được nhỉ ?

Đành dùng từ "Cạn lời"

 

[huhumalu]

Bạn gửi file cho mình xem thử.
Chứ ngồi đoán vầy cũng kg thể hiểu được, vì mình thử *.xla, *.xlam đều bình thường.
Bạn lấy load 2 file này về chung 1 folder và chạy code trong SetUp_AddIn.xlsm để hiểu cách làm.

 

[YêuCN]

Bạn gửi file cho mình xem thử.
Chứ ngồi đoán vầy cũng kg thể hiểu được, vì mình thử *.xla, *.xlam đều bình thường.
Bạn lấy load 2 file này về chung 1 folder và chạy code trong SetUp_AddIn.xlsm để hiểu cách làm.

ok cảm ơn bạn nhiều, mình không biết lý do gì mà lúc chạy được lúc thì không !

 

[htin1997]

Tiện thể các anh/chú cho em hỏi.
- Thường là cài add-in vào máy khác, nay mọi người đã phát triển ra code để từ thêm add-in.
- Giờ có thể thêm 1 cái code để chèn "Excel Customizations.exportedUI" tự động thay đổi user trong file đó được không?
- Nếu làm thủ công thì em phải mở file UI bằng NotePad sau đó đổi user bằng Ctrl+H (lý do là Excel lúc cài add-in nó đưa về ổ C).
- Hoặc là các anh/chú hướng dẫn cài add-in làm sao mà cứ import cái file UI kia là dùng được ngay không? Vì công ty dùng chung ổ địa mạng.

 

[Nhattanktnn]

Tiện thể các anh/chú cho em hỏi.
- Thường là cài add-in vào máy khác, nay mọi người đã phát triển ra code để từ thêm add-in.
- Giờ có thể thêm 1 cái code để chèn "Excel Customizations.exportedUI" tự động thay đổi user trong file đó được không?
- Nếu làm thủ công thì em phải mở file UI bằng NotePad sau đó đổi user bằng Ctrl+H (lý do là Excel lúc cài add-in nó đưa về ổ C).
- Hoặc là các anh/chú hướng dẫn cài add-in làm sao mà cứ import cái file UI kia là dùng được ngay không? Vì công ty dùng chung ổ địa mạng.

Bạn nói hơi khó hiểu, bạn hỏi về đường dẫn vào folder addins trên các máy có user khác nhau à?

 

[befaint]

Bạn nói hơi khó hiểu, bạn hỏi về đường dẫn vào folder addins trên các máy có user khác nhau à?

Khi cài đặt Windows, người dùng thông thường (đơn giản) thường đặt tên tài khoản (User Name) là "ABC1", "ABC2"...
Mà cái chương trình đang nói kia nhập đường dẫn cố định (Lưu ý chỗ ổ C - cài đặt Windows) là "C:\Users\{Tên tài khoản}\....tới tập tin "

Và khi dùng chương trình cho máy tính khác, tên tài khoản có thể khác -> đường dẫn tham chiếu khác -> Đứt gân!

-----
Gõ cái từ khóa "Excel Customizations.exportedUI" là thấy đáp án luôn rồi, mà không hiểu sao họ còn hỏi.

 

[htin1997]

Khi cài đặt Windows, người dùng thông thường (đơn giản) thường đặt tên tài khoản (User Name) là "ABC1", "ABC2"...
Mà cái chương trình đang nói kia nhập đường dẫn cố định (Lưu ý chỗ ổ C - cài đặt Windows) là "C:\Users\{Tên tài khoản}\....tới tập tin "

Và khi dùng chương trình cho máy tính khác, tên tài khoản có thể khác -> đường dẫn tham chiếu khác -> Đứt gân!

-----
Gõ cái từ khóa "Excel Customizations.exportedUI" là thấy đáp án luôn rồi, mà không hiểu sao họ còn hỏi.

Hiểu chứ bác, đang hỏi là có cách nào import add-in như code trên mà đi kèm luôn cái UI, rồi từ sửa đường dẫn đến file xlam theo user luôn không?
Thủ công thì cháu biết rồi (trong câu hỏi có nói).

 

[YêuCN]

Hiểu chứ bác, đang hỏi là có cách nào import add-in như code trên mà đi kèm luôn cái UI, rồi từ sửa đường dẫn đến file xlam theo user luôn không?
Thủ công thì cháu biết rồi (trong câu hỏi có nói).

Bạn gửi cái ui gì đó lên đây thử nhé !

 

[htin1997]

Bạn gửi cái ui gì đó lên đây thử nhé !

Đây ạ, qua máy khác import ribbon thì sẽ lỗi đường dẫn.