Question

如何通过PowerShell更改Word文件的背景颜色？

$wd = New-Object -COM 'Word.Application'
$wd.Visible = $true   # set to $false for production

Get-ChildItem 'C:\1\*.doc' | % {
    $doc = $wd.Documents.Open($_.FullName)

    # Here's the problem
    $doc.Background.Fill.ForeColor.RGB = RGB(192, 192, 192)

    # Switch doc view to Online Layout view
    $doc.ActiveWindow.View.Type = 6

    $doc.Save($true)
    $doc.Close()
}

$wd.Quit()
[Runtime.InteropServices.Marshal]::ReleaseComObject($wd)
[GC]::Collect()
[GC]::WaitForPendingFinalizers()

我收到2个错误：

* RGB : The term 'RGB' is not recognized as the name of a cmdlet...
* Cannot find an overload for "Save" and the argument count: "1".

Answer 1

让我们解决一下我所知道的几个问题......

RGB：术语“RGB”无法识别为cmdlet的名称...

当然，您知道为什么这样做不起作用，因为PowerShell没有RGB cmdlet。但是，如果查看$doc.Background.Fill.ForeColor.RGB的输入，则会查找整数。参考此related article，您可以了解我们如何进行转换。

$doc.Background.Fill.ForeColor.RGB = [long](192 + (192* 256) + (192 * 65536))

需要解决一个需要注意的问题。虽然上面的代码不会导致错误，但您会注意到文档上没有显示颜色。这是因为默认情况下不显示背景颜色。您需要启用它。

$doc.Background.Fill.Visible = $true

好的，那个人现在已经完成了......

无法找到“保存”和参数计数的重载：“1”。

我们使用Get-Member来确切了解原因

PS C:\users\Cameron\Downloads> $doc | gm

   TypeName: Microsoft.Office.Interop.Word.DocumentClass
...
RunLetterWizard                          Method                void RunLetterWizard([ref] System.Object LetterContent, [ref] System.Object WizardMode), void _Document.Ru...
Save                                     Method                void Save(), void _Document.Save()                                                                           
SaveAs                                   Method                void SaveAs([ref] System.Object FileName, [ref] System.Object FileFormat, [ref] System.Object LockComments...
...

它不需要任何参数，所以我们只需删除$true。其他条目只是为了显示一些其他方法确实采取参数。

$doc.Save()

....所以....最后一个

True：术语“True”不被识别为cmdlet的名称......

我没有看到这个错误，并且会认为这是一个错字，没有被转移到你的问题代码中。

还是想念RGB？

原始PowerShell函数，通过少量数据验证复制功能

Function Get-RGB 
{ 
    Param( 
        [Parameter(Mandatory=$false)] 
        [ValidateRange(0,255)] 
        [Int] 
        $Red = 0, 
        [Parameter(Mandatory=$false)] 
        [ValidateRange(0,255)] 
        [Int] 
        $Green = 0,
        [Parameter(Mandatory=$false)] 
        [ValidateRange(0,255)] 
        [Int] 
        $Blue = 0 
    ) 
    Process 
    { 
        [long]($Red + ($Green * 256) + ($Blue * 65536))
    } 
}

实施例

PS C:\users\Cameron\Downloads> Get-RGB 129 0 54
3539073

Answer 2

只是为了澄清我在这里发布最终剧本。

此脚本将循环显示所选路径中的所有.doc文件。我遇到了一个问题，虽然doc文件是只读，所以我在另一个文件夹中将save()更改为SaveAs([ref]$name)并解决了问题。

$wd = New-Object -COM 'Word.Application'
$wd.Visible = $true   # set to $false for production

Get-ChildItem 'C:\songs\*.doc' | % {
$doc = $wd.Documents.Open($_.FullName)

$doc.Background.Fill.ForeColor.RGB = [long](249 + (232* 256) + (163 * 65536))
$doc.Background.Fill.Visible = $true

# Switch doc view to Online Layout view, otherwise the changes won't appear in normal view
$doc.ActiveWindow.View.Type = 6

# Replace folder path to solve "read-only" problem
$Name=($doc.Fullname).replace("songs","songs_edited")
$doc.SaveAs([ref]$Name)

$doc.Close()
}

$wd.Quit()
[Runtime.InteropServices.Marshal]::ReleaseComObject($wd)
[GC]::Collect()
[GC]::WaitForPendingFinalizers()

通过PowerShell更改Word文件的背景颜色

2 个答案: