$ket = New-Object -ComObject KET.Application
$ket.Visible = $false # 后台运行
$workbook = $ket.Workbooks.Open("F:\2026-03-31\管理\导入模板.xlsx")
$binding = "System.Reflection.BindingFlags" -as [type]
Foreach($property in $workbook.BuiltInDocumentProperties) {
try {
$pn = [System.__ComObject].invokemember("name",$binding::GetProperty,$null,$property,$null)
if ($pn -eq "Last Author") {
$lastSaved = [System.__ComObject].invokemember("value",$binding::GetProperty,$null,$property,$null)
}
Write-Host $pn #打印所有可遍历属性名
}
catch { }
}
Write-Host $lastSaved