使用PowerShell將Excel工作表另存為獨立文件

更新時間：2023年08月09日 08:24:46 作者：winfredzhang

這篇文章主要為大家介紹了如何使用?PowerShell?腳本將一個?Excel?文件中的每個工作表單獨另存為獨立的?Excel?文件，以提高工作效率，需要的可以參考一下

導語

在日常工作中，我們經(jīng)常需要處理 Excel 文件。本文介紹了如何使用 PowerShell 腳本將一個 Excel 文件中的每個工作表單獨另存為獨立的 Excel 文件，以提高工作效率。

1. 準備工作

在開始之前，請確保已經(jīng)安裝了 Microsoft Excel 并在 PowerShell 環(huán)境中啟用了 COM 對象。

2. PowerShell 腳本

下面是執(zhí)行該操作的 PowerShell 腳本：

# 導入 Excel COM 對象
$excel = New-Object -ComObject Excel.Application
$excel.Visible = $false
# 打開 Excel 文件
$workbook = $excel.Workbooks.Open("C:\Users\86182\Documents\WeChat Files\wxid_hkpktzc30d1621\FileStorage\File\2023-08\餐飲記分系統(tǒng)情況匯總(2023.8.6).xlsx")
# 遍歷每個工作表
foreach ($worksheet in $workbook.Worksheets) {
    # 創(chuàng)建一個新的工作簿
    $newWorkbook = $excel.Workbooks.Add()
    # 將當前工作表復制到新的工作簿
    $worksheet.Copy($newWorkbook.Sheets[1])
    # 保存新的工作簿為獨立的文件（以工作表名命名）
    $newFilePath = "C:\delphisource\mytools\mynewtools\output\" + $worksheet.Name + ".xlsx"
    $newWorkbook.SaveAs($newFilePath)
    # 關(guān)閉新的工作簿
    $newWorkbook.Close()
}
# 關(guān)閉并退出 Excel
$workbook.Close()
$excel.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($excel) | Out-Null