Excel) (AddIns 物件
AddIn物件的集合,代表 Microsoft Excel 可用的所有增益集,不論是否已安裝。
這個清單就是顯示在 [增益集] 對話方塊中的增益集清單。
使用 Application 屬性可傳回 AddIns 集合。 下列範例會建立一份清單,其中包含所有現有增益集的名稱及安裝狀態。
Sub DisplayAddIns()
Worksheets("Sheet1").Activate
rw = 1
For Each ad In Application.AddIns
Worksheets("Sheet1").Cells(rw, 1) = ad.Name
Worksheets("Sheet1").Cells(rw, 2) = ad.Installed
rw = rw + 1
Next
End Sub
使用 Add 方法可將增益集新增至可用的增益集清單。 Add 方法會將增益集新增至清單,但不會安裝增益集。 將增益集的 Installed 屬性設定 為 True 以安裝增益集。
若要安裝未出現在可用增益集清單中的增益集,您必須先使用 Add 方法,然後設定 Installed 屬性。 這個程序可用一個步驟完成,如下列範例所示 (請注意,Add 方法使用的是增益集名稱,而非增益集標題)。
AddIns.Add("generic.xll").Installed = True
使用 AddIns (索 引) ,其中 index 是增益集標題或索引編號,可傳回單一 AddIn 物件。 下列範例會安裝「分析工具箱」增益集。
AddIns("analysis toolpak").Installed = True
請勿混淆增益集標題,其會出現在 [ 載入 宏] 對話方塊中,並包含增益集名稱,也就是增益集的檔案名。 您必須將增益集標題拼字與加 載 宏對話方塊中拼字完全一樣,但大寫不一定要相符。
有關於 Office VBA 或這份文件的問題或意見反應嗎? 如需取得支援服務並提供意見反應的相關指導,請參閱 Office VBA 支援與意見反應。