读取 Excel 表中特定列的最后一行并附加更多数据 - 在 PowerShell

Question

我正在尝试使用 PowerShell 将数据写入 Excel 电子表格中的特定列。 我想从最后一行的数据开始，然后继续向下。 在机器上我没有安装 Excel 所以 COM 对我不起作用。 我目前正在使用Import-Excel来读取整个工作表，并使用Open-ExcelPackage来读取特定的单元格值。

如果更容易，我可以在CSV文件中执行此操作，而不是.xlsx 。

任何帮助都会很棒！

Answer 1

从https://github.com/RamblingCookieMonster/PSExcel下载 PSExcel 模块 使用 Import-Module 导入。

然后使用以下代码：

$File = "Path to xlxs file"
$WSName = "SheetName"
$Excel = New-Excel -Path $File
$Worksheet = $Excel | Get-WorkSheet -Name $WSName

$SampleRows = @()
$SampleRows += [PSCustomObject]@{"A" = 1; "B" = 2; "C" = 3; "F" = 4 }
$row_to_insert = $SampleRows.count

$Worksheet.InsertRow($Worksheet.Dimension.Rows,$row_to_insert)
$WorkSheet.Cells["$($Worksheet.Dimension.Start.Address -replace ""\d"")$($Worksheet.Dimension.End.Row):$($Worksheet.Dimension.End.Address)"].Copy($WorkSheet.Cells["$($Worksheet.Dimension.Start.Address -replace ""\d"")$($Worksheet.Dimension.End.Row - $row_to_insert):$($Worksheet.Dimension.End.Address -replace ""\d"")$($Worksheet.Dimension.End.Row - $row_to_insert)"]);
$WorkSheet.Cells["$($Worksheet.Dimension.Start.Address -replace ""\d"")$($Worksheet.Dimension.End.Row):$($Worksheet.Dimension.End.Address)"] | % {$_.Value = ""}
ForEach ($Row in $SampleRows) {
ForEach ($data in $Row.PSObject.Properties.Name) {
$WorkSheet.Cells["$data$($Worksheet.Dimension.Rows)"].Value = $SampleRow.$data
}
}
$Excel | Close-Excel -Save

此代码在所选工作表的最后一行之后添加 1 行，并从$SampleRows向该行添加值 .... 我想你明白了。 如果您需要向$SampleRows数组添加更多行。