如何通过PowerShell访问并修改Word形状的样式？

核心问题分析 #

你遇到的错误本质是程序集加载方式错误以及枚举类型引用路径不对：

• PowerShell操作Office COM对象时，无需手动用Add-Type加载Microsoft.Office.Core，创建Word.Application实例后会自动关联相关类型。
• MsoShapeStyleIndex、WdPresetLineDash等枚举的归属命名空间不是Microsoft.Office.Interop.Word，前者属于Office命名空间，后者属于Microsoft.Office.Interop.Word但需要通过COM实例间接引用。

修正后的代码 #

# 创建Word应用实例
$word = New-Object -ComObject Word.Application
$word.Visible = $true # 可选，方便实时查看效果

# 打开目标文档
$doc = $word.Documents.Open("你的文档完整路径")

foreach ($shape in $doc.Shapes) {
    if ($shape.Name -like "Straight Arrow Connector*") {
        # 设置线条为红色：直接用RGB值，无需转换ARGB格式
        $red = [Microsoft.VisualBasic.Information]::RGB(255, 0, 0)
        $shape.Line.ForeColor.RGB = $red

        # 设置预设线条样式：使用Office命名空间下的MsoShapeStyleIndex枚举
        $shape.ShapeStyle = [Office.MsoShapeStyleIndex]::msoLineStylePreset1

        # 若需设置虚线样式，单独修改Line.DashStyle属性（对应Word的WdPresetLineDash枚举）
        $shape.Line.DashStyle = [Microsoft.Office.Interop.Word.WdPresetLineDash]::wdLineDashDot
    }
}

# 保存并关闭文档（按需执行）
$doc.Save()
$doc.Close()
$word.Quit()

关键细节说明 #

1. 枚举类型的正确引用

   • ShapeStyle对应的是Office.MsoShapeStyleIndex枚举，不属于Microsoft.Office.Interop.Word命名空间。
   • 线条虚线样式需要设置Line.DashStyle属性，对应Microsoft.Office.Interop.Word.WdPresetLineDash枚举，和ShapeStyle是两个独立属性。

2. RGB值的正确使用
   Word的ForeColor.RGB接受普通RGB整数，[Microsoft.VisualBasic.Information]::RGB()返回的就是正确格式，调用ToArgb()会生成ARGB格式整数，导致颜色显示异常。

3. 避免手动加载程序集
   通过New-Object -ComObject Word.Application创建COM实例后，PowerShell会自动加载所需的Office互操作程序集，无需手动执行Add-Type。

内容的提问来源于stack exchange，提问作者ScareFries