Как сохранить Excel 2007 в формате HTML, используя PowerShell? - PullRequest
2 голосов
/ 07 августа 2011

Здравствуйте, я пытался с этим кодом

$e = New-Object -ComObject "Excel.Application"
$e.Visible = $true
$ew = $e.Workbooks.Open("C:\Users\mich\14_50_33__5_Pt_50_sie_2011.xls")
$ew.SaveAs("C:\Users\mich\Documents\test", "Excel.XlFileFormat.xlHtml")

Что я делаю не так?


Вот мой собственный рабочий код:

$xlExcelHTML = 44
$Excel = New-Object -ComObject "Excel.Application"
$Excel.Visible = $true
$WorkBook = $Excel.Workbooks.Open("C:\Users\mich\14_50_33__5_Pt_50_sie_2011")
$WorkSheet = $WorkBook.Worksheets.Item(1)
$WorkBook.SaveAs("C:\temp\test8",$xlExcelHTML)

Вот ссылка на код расширения формата: http://msdn.microsoft.com/en-us/library/bb241279(office.12).aspx

1 Ответ

4 голосов
/ 07 августа 2011

Это работает для меня.Есть 12 аргументов, которые нужно передать методу saveAs.Заполните каждый неуказанный аргумент [type] :: Missing

$xlHtml = 44
$missing = [type]::Missing
$xl = New-Object -ComObject Excel.Application
$xl.Visible = $true
$wb = $xl.Workbooks.Open('d:\book1.xlsx')
$xl.ActiveWorkbook.SaveAs('d:book1.html',$xlHtml,$missing,$missing,$missing,$missing,$missing,$missing,$missing,$missing,$missing,$missing)
$xl.Quit()
...