Làm Sao Chèn Add-Ins Tự động vào Excel (1 người xem)

[Kiều Mạnh]

Thông thường mình muốn insert một file xla vào Excel thì mình thực hiện như sau
1/ file\Options\Add-ins\Go\Browse.. đến ổ dĩa có file Add-in hoặc trước đây đã từng thực hiện có sẳn rồi thì chỉ việc check vào thôi
2/ thực hiện bằng code VBA

Sub Insert_Add_Ins()          ''Insert theo duong dan
    AddIns.Add Filename:= _
        "C:\Program Files\Add_Ins\Add_Ins.xlam"
    AddIns("Add_Ins").Installed = True
End Sub

*** Nhờ trợ giúp:
3/ mình sử dụng Win7+Office 2010. Mình để file xla trong C:\Program Files\Add_Ins\.xla....thì có cách nào khi mình mở một file Excel
bình thường lên thì nó tự động chèn file Add-ins đó vào được ko mà không cần thực hiện theo mục 1 và 2
4/ có cách nào khác can thiệp vào các khoá Regedit để điều chỉnh office khi mở lên tự động insert add-ins vào được ko..
5/ nếu còn cách nào khác nữa mong các bạn trợ giúp
xin cảm ơn

 

[ndu96081631]

3/ mình sử dụng Win7+Office 2010. Mình để file xla trong C:\Program Files\Add_Ins\.xla....thì có cách nào khi mình mở một file Excel bình thường lên thì nó tự động chèn file Add-ins đó vào được ko mà không cần thực hiện theo mục 1 và 2

"Nó tự động" là cái gì tự động. Tôi hiểu là phải có thêm 1 AddIn nữa để làm vụ "tự động" này. Vậy cuối cùng bạn vẫn phải thao tác bằng tay để chèn cái AddIn đó vô thôi

 

[Kiều Mạnh]

"Nó tự động" là cái gì tự động. Tôi hiểu là phải có thêm 1 AddIn nữa để làm vụ "tự động" này. Vậy cuối cùng bạn vẫn phải thao tác bằng tay để chèn cái AddIn đó vô thôi

dạ em nghĩ nếu có cách nào khi mở một file excel bình thường lên thì nó tự động insert cái file Add-ins em để ở ổ c vào thì tốt. mà ko phải thao tác bằng tay theo mục 1 hoặc 2 bài #1
cảm ơn anh

 

[ndu96081631]

dạ em nghĩ nếu có cách nào khi mở một file excel bình thường lên thì nó tự động insert cái file Add-ins em để ở ổ c vào thì tốt. mà ko phải thao tác bằng tay theo mục 1 hoặc 2 bài #1
cảm ơn anh

Thì tôi nói rồi đấy: Khi bạn mở file lên mà có "cái gì đó" tự động làm việc thì chỉ có thể là 1 AddIn. Vậy đương nhiên bạn phải chèn bằng tay cái AddIn này rồi, đúng không?
Mà đằng nào cũng phải làm bằng tay 1 lần, vậy thôi bạn làm bằng tay cái AddIn của bạn cho rồi (dù gì thì chỉ làm 1 lần duy nhất thôi)

 

[VetMini]

dạ em nghĩ nếu có cách nào khi mở một file excel bình thường lên thì nó tự động insert cái file Add-ins em để ở ổ c vào thì tốt. mà ko phải thao tác bằng tay theo mục 1 hoặc 2 bài #1
cảm ơn anh

Bạn vọc chơi cho vui để tìm hiểu thì không nói làm gì. Nhưng bảo tốt thì là chuyện khác. Tự động kiểu này giống như bạn để cái đuốc trong nhà, mở cửa ra thì đuốc tự động châm vào đèn cháy sáng lên. Một ngày nào đó, đuốc châm trật đèn...

 

[Kiều Mạnh]

Bạn vọc chơi cho vui để tìm hiểu thì không nói làm gì. Nhưng bảo tốt thì là chuyện khác. Tự động kiểu này giống như bạn để cái đuốc trong nhà, mở cửa ra thì đuốc tự động châm vào đèn cháy sáng lên. Một ngày nào đó, đuốc châm trật đèn...

Thì cũng rãnh ngồi nghiên cứu code xem có thực hiện được theo hướng này hay hướng khác thôi mà rồi từ đó tìm ra một hướng đi phú hợp thôi
chứ cũng đâu có làm gì đâu...có khi nghiên cứu đã đi được rồi xong lại lưu vào một góc thôi mà
cảm ơn nhiều

 

[Quang_Hải]

Thì cũng rãnh ngồi nghiên cứu code xem có thực hiện được theo hướng này hay hướng khác thôi mà rồi từ đó tìm ra một hướng đi phú hợp thôi
chứ cũng đâu có làm gì đâu...có khi nghiên cứu đã đi được rồi xong lại lưu vào một góc thôi mà
cảm ơn nhiều

Có gì khó khăn đâu.
Thử vầy đi

Sub InstallAddIn()
Dim MyAddIn As Excel.AddIn
Dim AddinName As String
AddinName = "E:\EXCEL\abc.xla"
Set MyAddIn = Application.AddIns.Add(AddinName)
MyAddIn.Installed = True
End Sub

Muốn load lên thì chạy thêm code này

Sub LoadAddIn()
Dim AddinName
AddinName = "abc"
Application.AddIns(AddinName).Installed = 1
End Sub

 

[Kiều Mạnh]

Có gì khó khăn đâu.
Thử vầy đi

Sub InstallAddIn()
Dim MyAddIn As Excel.AddIn
Dim AddinName As String
AddinName = "E:\EXCEL\abc.xla"
Set MyAddIn = Application.AddIns.Add(AddinName)
MyAddIn.Installed = True
End Sub

Muốn load lên thì chạy thêm code này

Sub LoadAddIn()
Dim AddinName
AddinName = "abc"
Application.AddIns(AddinName).Installed = 1
End Sub

ý em là khi mở một file excel mới lên chưa code két gì hết mà nó insert được cái Add-ins đó vào chứ ...nếu code thì em đã làm ở bài #1 rồi em cho nó vào Sub Autpen là nó chạy thôi mà
Ý em là thử tìm hiểu xem:
1/ Có thể can thiệp chỉnh sửa mấy khoá Office trong regedit xem có được ko hay
2/ Copy Add-ins vào folder nào đó của Office VVV ... khi mở một file mới lên thì nó tự load cái Add-ins đó luôn..
3/ Các cách khác có thể nếu được

 

[Quang_Hải]

ý em là khi mở một file excel mới lên chưa code két gì hết mà nó insert được cái Add-ins đó vào chứ ...nếu code thì em đã làm ở bài #1 rồi em cho nó vào Sub Autpen là nó chạy thôi mà
Ý em là thử tìm hiểu xem:
1/ Có thể can thiệp chỉnh sửa mấy khoá Office trong regedit xem có được ko hay
2/ Copy Add-ins vào folder nào đó của Office VVV ... khi mở một file mới lên thì nó tự load cái Add-ins đó luôn..
3/ Các cách khác có thể nếu được

Hiểu muốn gì chết liền đó. Nói chung là hình như mọi thứ đều có thể. Có điều là mình không làm được thôi.

...........
Thử viết code lưu trong Personal Macro Workbook đi, nó luôn chạy theo excel

 

[Kiều Mạnh]

Hiểu muốn gì chết liền đó. Nói chung là hình như mọi thứ đều có thể. Có điều là mình không làm được thôi.

...........
Thử viết code lưu trong Personal Macro Workbook đi, nó luôn chạy theo excel

đơn giản là mở một file Excel mới lên trong đó ko có code két gì hết mà cũng ko phải làm thủ công isert cái Addins đó vào mà nó tự load vào thôi

 

[Quang_Hải]

đơn giản là mở một file Excel mới lên trong đó ko có code két gì hết mà cũng ko phải làm thủ công isert cái Addins đó vào mà nó tự load vào thôi

Vậy thì chắc ăn là phải dùng cái Personal rồi. Thử nghiên cứu theo hướng đó đi. Vì khi mở bất kỳ file excel nào thì hắn cũng ăn theo.

 

[Kiều Mạnh]

Vậy thì chắc ăn là phải dùng cái Personal rồi. Thử nghiên cứu theo hướng đó đi. Vì khi mở bất kỳ file excel nào thì hắn cũng ăn theo.

cái này chắc khoãng 2 năm nữa em mới biết viết quá....mới biết viết được vài code lèo tèo thôi.....

 

[Nguyễn Duy Tuân]

Bạn mở file Excel cần load add-in. Vào VBE, vào menu Tools\References...., chọn Browse, chọn kiểu file hiển thị là *.*, tìm tới thư mục chứa add-in và chọn file là được.

 

[Kiều Mạnh]

Bạn mở file Excel cần load add-in. Vào VBE, vào menu Tools\References...., chọn Browse, chọn kiểu file hiển thị là *.*, tìm tới thư mục chứa add-in và chọn file là được.

mình làm như bạn hướng dẫn mặc dù trong của Số VBA thấy Add-ins đã được insert vào rồi nhưng khi chọn ok để kết thức thì báo lỗi hình sau....
mình nghĩ lỗi là do mình đặt pass VBA . sau đó mình bỏ Pass VBA làm lại thì nó vẫn báo lỗi như vậy
cảm ơn nhiều

 

[Quang_Hải]

mình làm như bạn hướng dẫn mặc dù trong của Số VBA thấy Add-ins đã được insert vào rồi nhưng khi chọn ok để kết thức thì báo lỗi hình sau....
mình nghĩ lỗi là do mình đặt pass VBA . sau đó mình bỏ Pass VBA làm lại thì nó vẫn báo lỗi như vậy
cảm ơn nhiều

Thông báo là bị trùng tên Module hay gì gì đó. Kiểm tra lại các tên Sub và Module.

 

[Nguyễn Duy Tuân]

Bạn cần mở add-in và sửa tên VBProject một tên đảm bảo không bị trùng với các file khác là được.

 

[Kiều Mạnh]

Bạn cần mở add-in và sửa tên VBProject một tên đảm bảo không bị trùng với các file khác là được.

không trùng tên nào hết nhưng sửa VBProject thành một tên XYZ thì ok nhưng xong xuôi đâu đó mở một file Exel mới lên thì không thấy Add-ins
đâu hết ....mong bạn hướng dẫn thêm
xin cảm ơn

 

[Nguyễn Duy Tuân]

Muốn theo ý bạn phải chạy chương trình cài Add-in riêng, độc lập với file Excel. Bạn tìm bài viết của mình liên quan đến cài add-in vì lâu quá rồi không nhớ bài viết đó ở mục nào.

 

[ndu96081631]

không trùng tên nào hết nhưng sửa VBProject thành một tên XYZ thì ok nhưng xong xuôi đâu đó mở một file Exel mới lên thì không thấy Add-ins
đâu hết ....mong bạn hướng dẫn thêm
xin cảm ơn

Dám cá với bạn hổng có cách nào phục vụ được nhu cầu của bạn (tôi đọc bài viết của bạn và tôi hiểu nó là như vậy)
Bởi muốn tự động cái gì đó khi khởi động file Excel (dù file trắng hay.. đen) thì buộc bạn phải cài 1 AddIn để nó làm cái việc tự động này. Đến đây thì có 1 nghịch lý:
- Bạn phải cài bằng tay cái AddIn thứ 2 để nó làm công việc tự động cài AddIn thứ nhất
- Đằng nào cũng phải làm bằng tay thì sao không thực hiện cài bằng tay cho cái AddIn thứ nhất của bạn luôn?
Vậy:
- Hoặc là bạn buộc phải làm bằng tay
- Hoặc là bạn dùng phần mềm khác để thực hiện điều này (VB6 chẳng hạn)

 

[Kiều Mạnh]

Dám cá với bạn hổng có cách nào phục vụ được nhu cầu của bạn (tôi đọc bài viết của bạn và tôi hiểu nó là như vậy)
Bởi muốn tự động cái gì đó khi khởi động file Excel (dù file trắng hay.. đen) thì buộc bạn phải cài 1 AddIn để nó làm cái việc tự động này. Đến đây thì có 1 nghịch lý:
- Bạn phải cài bằng tay cái AddIn thứ 2 để nó làm công việc tự động cài AddIn thứ nhất
- Đằng nào cũng phải làm bằng tay thì sao không thực hiện cài bằng tay cho cái AddIn thứ nhất của bạn luôn?
Vậy:
- Hoặc là bạn buộc phải làm bằng tay
- Hoặc là bạn dùng phần mềm khác để thực hiện điều này (VB6 chẳng hạn)

Em đã đọc ở ở 2 link sau của GPE những thấy khó quá ....VBA thì đang tập tành mò chưa xong. Còn thì VB6 mù tịt....
http://www.giaiphapexcel.com/forum/showthread.php?5457-Tạo-cài-đặt-cho-AddIns
http://www.giaiphapexcel.com/forum/...-AddIns-cho-Excel-trong-VB6&p=38137#post38137