首页 > 解决方案 > 将 Excel 工作表转换为“XML 文档”文件类型的脚本(另存为类型“XML 电子表格 2003”)

问题描述

我需要将 excel 工作表(.xlsx)转换为“XML 文档”(.xlsx)文件类型。目前手动打开每个工作表并将它们保存为“XML 电子表格 2003”,我正在寻找 powershell 脚本或 excel-VBA 宏来减少手动工作。

下面的代码将 .xlsx 文件转换为 .xml

$Path = "C:\dev\"

$dev = Get-ChildItem -Path "$Path*" -Include "*.xls","*.xlsx"

If ($dev.Count -gt 0) {
    Write-Host "Excel files found:" $dev.Count
Foreach ($File in $dev) {
          $XLXMLSpreadsheet = 46
          $Excel = New-Object -ComObject Excel.Application
          $WorkBook = $Excel.Workbooks.Open($File.FullName)
          $Destination = $Path + $File.BaseName + ".xml"
          $WorkBook.SaveAs($Destination, $XLXMLSpreadsheet)
          $Excel.Quit()
          }
          Stop-Process -Name EXCEL
                      }
Else {Write-Warning "Could not find any excel files. Please ensure this path is correct and 
the files exist:`n'$Path'"}

此代码 convert.xml 文件为“XM 文件”,但我的要求是转换为“XML 文档”文件类型。我尝试寻找 excel save as value for 'XML Spreadsheet 2003' 格式,但没有运气。将 .xlsx 文件转换为 .xml('XML Document') 的任何想法都会有很大帮助。

标签: sql-serverexcelvbapowershell

解决方案


推荐阅读