如何修改PowerShell读取Excel代码以生成可索引数组？

方案一：使用ImportExcel模块（推荐） #

这个模块简化了Excel读写操作，无需手动处理COM对象，先确保模块已安装：

Install-Module -Name ImportExcel -Scope CurrentUser -Force

以下是完整修改代码，实现读取Excel为可索引数组、赋值指定元素、遍历写入更新：

# 读取目标Excel文件的指定工作表
$excelData = Import-Excel -Path "C:\Your\File\Path.xlsx" -WorksheetName "Sheet1"

# 初始化可索引数组，同步Excel数据行数，填充原有EmailSent值（无则设为$null）
$Emailssent = @()
foreach ($row in $excelData) {
    $Emailssent += $row.EmailSent ?? $null
}

# 按索引赋值示例：给第3行（数组索引为2）设置1小时后的日期
$Emailssent[2] = Get-Date -Format g ((Get-Date).AddHours(1))

# 遍历数组，将更新后的值同步回Excel数据对象
foreach ($index in 0..($excelData.Count - 1)) {
    $excelData[$index].EmailSent = $Emailssent[$index]
}

# 将更新后的数据导出回Excel（覆盖原文件或指定新路径）
$excelData | Export-Excel -Path "C:\Your\Updated\File.xlsx" -WorksheetName "Sheet1" -Force

关键说明 #

• $Emailssent初始化为空数组@()，通过遍历Excel数据填充后，成为与行数匹配的可索引数组，支持$Emailssent[$i]直接赋值。
• 若无需保留原有EmailSent列数据，可直接创建指定长度的空数组：$Emailssent = New-Object object[] $excelData.Count

方案二：使用COM对象（无模块权限时） #

如果无法安装模块，可通过Excel COM对象实现：

# 初始化Excel COM对象
$excel = New-Object -ComObject Excel.Application
$excel.Visible = $false
$workbook = $excel.Workbooks.Open("C:\Your\File\Path.xlsx")
$worksheet = $workbook.Worksheets.Item("Sheet1")
$totalRows = $worksheet.UsedRange.Rows.Count

# 初始化可索引数组，读取原有EmailSent列数据（假设列C为EmailSent，索引3）
$Emailssent = @()
for ($row = 2; $row -le $totalRows; $row++) { # 第1行作为表头，从第2行开始读取数据
    $Emailssent += $worksheet.Cells.Item($row, 3).Value2 ?? $null
}

# 按索引赋值示例：给第3行数据设置1小时后的日期
$Emailssent[1] = Get-Date -Format g ((Get-Date).AddHours(1))

# 遍历数组写入Excel
for ($row = 2; $row -le $totalRows; $row++) {
    $worksheet.Cells.Item($row, 3).Value2 = $Emailssent[$row - 2] # 数组索引从0开始，对应行偏移2
}

# 保存文件并清理COM对象
$workbook.SaveAs("C:\Your\Updated\File.xlsx")
$workbook.Close()
$excel.Quit()
[System.Runtime.Interopservices.Marshal]::ReleaseComObject($excel) | Out-Null

关键说明 #

• 操作完成后必须释放COM对象，避免Excel进程在后台残留。
• 列索引需对应实际Excel中的列位置（A=1，B=2，以此类推）。

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