使用活動開啟的 Excel 電子表格將巨集作為獨立檔案執行

使用活動開啟的 Excel 電子表格將巨集作為獨立檔案執行

我有一個宏,目前我們下載一個電子表格更新:它會自動開啟(並且不會儲存)--從我們定制的內部網路介面。電子表格名稱每次都會更改。目前的使用說明是開啟VBA編輯器,將巨集複製到新模組中,然後執行巨集。

我想製作一個獨立的文件來製作類似這樣的說明,打開工作簿,然後雙擊文件。

我的想法是,他們只能打開有問題的工作簿,而獨立文件代碼將類似於use open workbook(非常通用)。

我讀過有關 vbs 的內容,但我所做的只是將巨集從 .txt 更改為 vbs ,顯然它還不起作用。有人能指出我正確的方向嗎?

答案1

雖然我能夠讓它工作,但我沒有使用這種方法,因為它涉及在 Office 中啟用「信任 VBA 專案」設置,而且對我來說這聽起來並不安全。

https://security.stackexchange.com/questions/205803/is-it-safe-to-enable-trust-access-to-the-vba-object-model-microsoft-office/205814#205814

但它的工作原理如下:

Dim  xlApp, xlBook

Set xlApp = getObject( , "Excel.Application")
Set xlBook = xlApp.ActiveWorkbook

xlBook.VBProject.VBComponents.Import "\\PATH\Module1.bas"
xlApp.Run "Sub_Name"
'objExcel.ActiveWorkbook.Close


xlApp.Application.Quit
WScript.Echo "Finished."
WScript.Quit

我最終做的是透過 --> 分發自訂“OfficeUI”https://www.freesoftwareservers.com/display/FREES/Distributing+Macro+via+Add-In+-+Customized+Ribbon+-+Via+Batch

由於某種原因,透過我們的 Web 介面中的連結載入 Excel 時,XLSTART 和 Personal.xlsb 中的檔案均未載入。但是,OfficeUI 自訂功能區已載入。我仍然將 AddIn.xlam 放入 XLSTART 中,因為 Excel 不會警告有關“宏”的信息,但它在啟動時並未加載。但這並不重要,因為 OfficeUI 直接呼叫了 file!Sub。

相關內容