☰

如何在 Windows 上自動開啟、儲存和關閉 Excel 檔案？

tag-icon • tag-icon windows automation
如何在 Windows 上自動開啟、儲存和關閉 Excel 檔案？

我有一個客戶自動接收 Excel 格式的報表。這些檔案有一個.xlsx副檔名。他們使用 FileMaker 將資料處理成他們喜歡的格式。

FileMaker 支援文件匯入.xlsx，但除非在 Excel 中開啟、儲存和關閉這些文件，否則這些文件會被封鎖。需要做的就是打開文件、儲存並關閉它。內容未作任何更改。當他們在 Windows 上執行或我在 macOS 上執行時，這是有效的。

如果他們使用 macOS，我會使用 AppleScript 來自動化此過程。是否有本機 Windows 方法可以執行此操作？

答案1

@HelpingHand 為我指明了正確的方向。我最終學習了足夠的 VB 腳本，並編寫了一個小型的可雙擊腳本，用於將特定路徑上的檔案從 Excel 轉換為 CSV。

set xls = CreateObject("Excel.Application")
xls.DisplayAlerts = False

set fso = CreateObject("Scripting.FileSystemObject")
set w_shell = CreateObject("WScript.Shell")

desktop = w_shell.SpecialFolders("Desktop")
folder_path = fso.GetAbsolutePathName(desktop) & "\Payroll\"

set folder = fso.GetFolder(folder_path)
set files = folder.Files

for each file in files
    path = folder_path & file.Name
    set workbook = xls.Workbooks.Open(path)
    path = Replace(path, "xlsx", "csv")
    workbook.SaveAs path, 6
    workbook.Close False
next

xls.Quit

相關內容