尝试保存已打开的Excel工作簿时出现RPC_E_CALL_REJECTED错误

错误原因分析 #

• RPC_E_CALL_REJECTED错误本质是Excel进程正忙（比如你正在编辑单元格、Excel弹出警告对话框等），拒绝了脚本的COM调用。
• 你的脚本存在几个核心问题：
  • 已经通过GetActiveObject获取了正在运行的Excel实例，却又调用Workbooks.Open尝试重新打开已打开的工作簿，触发不必要的冲突
  • 直接修改$excel.Visible可能干扰当前Excel的正常运行状态
  • 没有处理Excel忙碌的重试逻辑，也未正确定位已打开的目标工作簿

修正后的脚本 #

# 替换成你的工作簿完整路径
$targetWorkbookPath = "C:\Example\YourWorkbook.xlsx"

# 获取当前运行的Excel实例
try {
    $excel = [Runtime.Interopservices.Marshal]::GetActiveObject('Excel.Application')
}
catch {
    Write-Error "未找到正在运行的Excel实例，请确保目标工作簿已打开"
    exit
}

# 查找已打开的目标工作簿
$workbook = $excel.Workbooks | Where-Object { $_.FullName -eq $targetWorkbookPath }

if (-not $workbook) {
    Write-Error "目标工作簿没在Excel里打开，请先手动打开它"
    [System.Runtime.InteropServices.Marshal]::ReleaseComObject($excel) | Out-Null
    exit
}

# 处理Excel忙碌状态，添加重试逻辑
$retryCount = 3
$retryDelay = 2000 # 每次重试间隔2秒
$savedSuccessfully = $false

for ($i=1; $i -le $retryCount; $i++) {
    try {
        $workbook.Save()
        Write-Host "工作簿保存成功"
        $savedSuccessfully = $true
        break
    }
    catch [System.Runtime.InteropServices.COMException] {
        if ($_.Exception.HResult -eq 0x80010001) { # 匹配RPC_E_CALL_REJECTED错误
            Write-Host "Excel正忙，第$i次重试..."
            Start-Sleep -Milliseconds $retryDelay
        }
        else {
            Write-Error "保存失败：$($_.Exception.Message)"
            break
        }
    }
}

# 正确释放COM对象，避免残留进程
[System.Runtime.InteropServices.Marshal]::ReleaseComObject($workbook) | Out-Null
[System.Runtime.InteropServices.Marshal]::ReleaseComObject($excel) | Out-Null
[System.GC]::Collect()
[System.GC]::WaitForPendingFinalizers()

实现每5分钟自动运行 #

通过Windows任务计划程序设置：

• 创建基本任务，触发器选择“每天”，设置重复任务间隔为5分钟，持续时间24小时
• 操作选择“启动程序”，程序/脚本填powershell.exe，添加参数填-File "你的脚本完整路径.ps1"

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