在调用Workbooks.Add()时使用Powershell自动化Excel 2007的异常

Question

以下代码在Powershell V1(Excel 2007)中引发异常:

$E = New-Object -COM "Excel.Application"
$E.Visible = $True
$wb = $E.Workbooks.Add() #<<<Exception here

错误表示格式可能是旧的或类型库无效(从西班牙语翻译).Word的类似脚本运行得很好.

Answer 1

当目前的文化不是en-US时,Office互操作程序集似乎有这个问题.显而易见的解决方法是设置文化.

在交互式控制台上将整个事件作为单个命令运行非常重要,因为PowerShell V1始终为每个命令调用创建一个新线程.

PS C:\Users\jachymko> $e = new-object -com excel.application
PS C:\Users\jachymko> $e.workbooks.add()
Exception calling "Add" with "0" argument(s): "Old format or invalid type library. (Exception from HRESULT: 0x80028018 (TYPE_E_INVDATAREAD))"
At line:1 char:17
+ $e.workbooks.add <<<< ()
    + CategoryInfo          : NotSpecified: (:) [], MethodInvocationException
    + FullyQualifiedErrorId : ComMethodTargetInvocation

PS C:\Users\jachymko> & {
>> [threading.thread]::CurrentThread.CurrentCulture = 'en-US'
>> $e = new-object -com excel.application
>> $e.workbooks.add()
>> $e.visible=1
>> }
>>

Answer 2

根据MS 帮助和支持文章 320369中提出的解决方案之一改编为 Powershell 。

$ci = new-object system.globalization.cultureinfo "en-US"

$e = New-Object -COM "Excel.Application"
$e.Visible = $True
$e.UserControl= $True
$books = $e.Workbooks
$books.PSBase.GetType().InvokeMember( `
       "Add", `
       [system.reflection.bindingflags]::InvokeMethod, `
       $null, $books, $null, $ci)

来自同一篇文章：

当您对区域设置与 Office 当前语言版本不匹配的计算机使用这些解决方法之一时，您应该熟悉 Excel 的行为方式以及 Excel 将如何解释可能针对特定区域设置进行格式化的数据。