冻结工作表的顶部行

Question

这段PowerShell代码可以创建Excel表格。

我正在尝试冻结顶部行：

$excel = New-Object -Com Excel.Application
$excel.Visible = $True
$wb = $Excel.Workbooks.Add()
$ws = $wb.Worksheets.Add()

$ws.Activate()
$ws.Select()

$excel.Rows.Item("1:1").Select()
$excel.ActiveWindow.FreezePanes = $true

与其冻结顶部行，它会冻结行和列的中心，即：

更新

重复帖子中的解决方案无效，即：

$excel.Rows("1:1").Select()
$excel.ActiveWindow.FreezePanes = $true

出现以下错误：

Method invocation failed because [System.__ComObject] does not contain a method named 'Rows'.
At D:\Script\upgrades.ps1:231 char:5
+     $excel.Rows("1:1").Select()
+     ~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (Rows:String) [], RuntimeException
    + FullyQualifiedErrorId : MethodNotFound

- Glowie

---

你正在使用哪个版本的MS Excel？我想“冻结顶行”功能只在Excel 2007及以后的版本中才有。 - Our Man in Bananas

可能是如何在Excel 2007 VBA中以编程方式冻结Excel工作表的顶部行？的重复问题。 - Our Man in Bananas

请参见SO：3232920如何以编程方式冻结Excel工作表的顶行。 - Our Man in Bananas

@OurManInBananas 我正在尝试那个解决方案，但它不起作用.....使用的是Excel 2007。 - Glowie

请查看[http://www.ozgrid.com/forum/showthread.php?t=19692]。 - Our Man in Bananas

Answer 1

为了冻结顶部行，您需要选择第二行。

$excel.Rows.Item("2:2").Select()
$excel.ActiveWindow.FreezePanes = $true

- Ansgar Wiechers

Answer 2

如果您有多个工作表并需要冻结每个工作表的顶部行：

$colSheets = ($Sheet1, $Sheet2, $Sheet3, $Sheet4, $Sheet5)

foreach ($page in $colSheets){
    $page.Select()
    $page.application.activewindow.splitcolumn = 0
    $page.application.activewindow.splitrow = 1
    $page.application.activewindow.freezepanes = $true
}
#After you are done, re-select first sheet (optional)
$Sheet1.Select()

- hostyd

Answer 3

$excel.Application.ActiveWindow.SplitRow = 1
$excel.Application.ActiveWindow.FreezePanes = $true

- Surgut

---

你应该对你的答案进行一些解释。 - Mikev