帖子: 523
主題: 56
精華: 0
積分: 601
點名: 88
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2025-4-16

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2013-5-11 09:54 | 顯示全部帖子

[發問] 自動加入Solver.xla 或 Solver.xlam

電腦內有EXCEL 2003及 2010 版本，或者說同一workbook檔要在不同的電曩內被使用，它們專屬的 SOLVER版本不同
每次都要人工來做 ADDIN 的動作，很不方便
請教大師先進有何方法在 Workbook 打開時能自動辨識並 Addin Solver

謝謝

樓主熱帖

Scott090

高中生 Rank: 3 Rank: 3

帖子: 523
主題: 56
精華: 0
積分: 601
點名: 88
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2025-4-16

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章

2^#

發表於 2013-5-11 20:08 | 顯示全部帖子

回復 2# GBKEE

感恩指導
1.依照執行會出現超出陣列範圍的錯誤，不知何故
2.solver.xla,solver.xlam 各自被安裝在不同的路徑內，例如 application.path, 因為被叫用的 excel.exe 版本不同
3.加載引用後做確認，是否引用成功；利用讀取引用項來作比對：
先取得計數有幾項被引用
Dim i as integer
i = ThisWorkbook.VBProject.References.Count
則出現 Thisworkbook.VBProject. .... 方法錯誤，找不出問題在哪裡

祈望 GBKEE 大師不吝指點

TOP

Scott090

高中生 Rank: 3 Rank: 3

帖子: 523
主題: 56
精華: 0
積分: 601
點名: 88
作業系統: win 10
軟體版本: []
閱讀權限: 50
性別: 男
註冊時間: 2013-3-19
最後登錄: 2025-4-16

2024年全勤獎章 2023年全勤獎章 2022虎年全勤獎章 2021牛年全勤獎章 2020鼠年全勤獎章 2019 豬年全勤獎章 2018 狗年全勤獎章 2017 雞年全勤獎章 2016猴年全勤獎章論壇榮譽勳章論壇贊助勳章 2015羊年全勤獎章

3^#

發表於 2013-5-11 22:40 | 顯示全部帖子

回復 4# GBKEE

感謝大師無私的指導
學到了 Addins.add filename:= 全路徑檔名
Addins().installed =

TOP