Powershell 数据处理

Question

亲爱的 Stack Overflow 社区，

我想你可以猜到，休斯顿有问题。 背景：我们公司遭到黑客攻击，我们丢失了大量数据。 现在，一切都已备份并运行（或多或少），我们发现我们的服务器上有成千上万的 old.xls 和 .doc 文档，在重新进入我们的品牌之前必须将其转换为新格式新的服务器结构。

目前我正在尝试编写一个将 XLS 转换为 XLSX 的脚本。 问题：我擅长批处理编程，但在涉及 Powershell 时完全迷失了。 这是我从头开始编写后的第三次尝试。 它做了它应该做的事情，但我不知道如何在 PS 中进行正确的数据处理。

它应该做什么：询问用户在哪里寻找 XLS 文件。 询问用户在哪里存储新的 XLSX 文件。 从目录（和子文件夹）中获取每个 .xls 文件，打开它并将其另存为 .xlsx 到给定路径。

到目前为止它做了什么：询问用户在哪里寻找 XLS 文件。 询问用户在哪里存储新的 XLSX 文件。 完全搞砸路径+无法打开文件。

当我修改脚本以提供完整路径时，它能够将.xls 转换为.xlsx。 所以 Excel 部分似乎是正确的。 我知道我的数据处理部分是非常错误的。 我现在尝试重写很多次。 我把它留在了，所以你可能会看到我试图做什么。

$LookXLS = Read-Host -Prompt 'Where do I look for XLS?' 
$TargetpathXLSX = Read-Host -Prompt 'Where to save the XLSX?'

Write-Host $LookXLS

cd $LookXLS # Change Directory to given path

Get-ChildItem -Path .\ -Filter *.xls -Recurse -File -Name| ForEach-Object {
    [System.IO.Path]::GetFileName($_)


$excel=New-Object -comobject Excel.Application
$excel.Visible =$TRUE
$excel.DisplayAlerts = $FALSE
$wb = $excel.Workbooks.Open($LookXLS)
$LookXLS=$TargetpathXLSX
$typ=".xlsx"
$TargetPathXLSX="$TargetpathXLSX\$_$typ"
echo $TargetPathXLSX
$excel.ActiveWorkbook.SaveAs("$TargetPathXLSX",51)

$excel.ActiveWorkbook.Close()

$excel.Quit()

}


echo Process finished.

pause

Output 看起来像这样：（由我评论，因为它部分是德语）

PS C:\Users\USER\Desktop\Testordner\Userverzeichnis> C:\Users\USER\Desktop\new 1.ps1

Where do I look for XLS?: C:\Users\USER\Desktop\Testordner\Userverzeichnis

Where to save the XLSX?: C:\Users\USER\Desktop\Testordner\Ziel

C:\Users\USER\Desktop\Testordner\Userverzeichnis
Microsoft Excel-Arbeitsblatt (neu) (2).xls
Wir konnten 'Arbeit\Microsoft Excel-Arbeitsblatt (neu) (2).xls' nicht finden. Wurde das Objekt vielleicht verschoben, umbenannt oder gelöscht? **#Can´t find it**
In C:\Users\USER\Desktop\new 1.ps1:17 Zeichen:1
+ $wb = $excel.Workbooks.Open($_)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : OperationStopped: (:) [], COMException
    + FullyQualifiedErrorId : System.Runtime.InteropServices.COMException
 
C:\Users\USER\Desktop\Testordner\Ziel\Arbeit\Microsoft Excel-Arbeitsblatt (neu) (2).xls.xlsx
Es ist nicht möglich, eine Methode für einen Ausdruck aufzurufen, der den NULL hat. 

**#NULL (obviously, the path is screwed up)**
In C:\Users\USER\Desktop\new 1.ps1:22 Zeichen:1
+ $excel.ActiveWorkbook.SaveAs("$TargetPathXLSX",51)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
 
Es ist nicht möglich, eine Methode für einen Ausdruck aufzurufen, der den NULL hat.
In C:\Users\USER\Desktop\new 1.ps1:24 Zeichen:1
+ $excel.ActiveWorkbook.Close()
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
 
Microsoft Excel-Arbeitsblatt (neu).xlsx
Wir konnten 'Arbeit\Microsoft Excel-Arbeitsblatt (neu).xlsx' nicht finden. Wurde das Objekt vielleicht verschoben, umbenannt oder gelöscht?
In C:\Users\USER\Desktop\new 1.ps1:17 Zeichen:1
+ $wb = $excel.Workbooks.Open($_)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : OperationStopped: (:) [], COMException
    + FullyQualifiedErrorId : System.Runtime.InteropServices.COMException
 
C:\Users\USER\Desktop\Testordner\Ziel\Arbeit\Microsoft Excel-Arbeitsblatt (neu) (2).xls.xlsx\Arbeit\Microsoft Excel-Arbeitsblatt (neu).xlsx.xlsx 

**#It gets worse every time it loops.**
Es ist nicht möglich, eine Methode für einen Ausdruck aufzurufen, der den NULL hat.
In C:\Users\USER\Desktop\new 1.ps1:22 Zeichen:1
+ $excel.ActiveWorkbook.SaveAs("$TargetPathXLSX",51)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull
 
Es ist nicht möglich, eine Methode für einen Ausdruck aufzurufen, der den NULL hat.
In C:\Users\USER\Desktop\new 1.ps1:24 Zeichen:1
+ $excel.ActiveWorkbook.Close()
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) [], RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

我希望，你能以某种方式帮助我。 我不是 PS 人，但遗憾的是，Batch 无法与 Excel 一起使用。 我不认为我离解决方案太远了。

Answer 1

尝试这个 -

$LookXLS = Read-Host -Prompt 'Where do I look for XLS?' 
$TargetpathXLSX = Read-Host -Prompt 'Where to save the XLSX?'

Write-Host "$($LookXLS) is where we look" -ForegroundColor cyan

cd $LookXLS # Change Directory to given path

Get-ChildItem -Path .\ -Filter *.xls -Recurse | ForEach-Object {
    
    $path = ($_.fullname).substring(0, ($_.FullName).lastindexOf("."))
    $excel = New-Object -comobject Excel.Application
    $excel.Visible = $TRUE
    $excel.DisplayAlerts = $FALSE
    $wb = $excel.Workbooks.Open($_.FullName)
    
    $path += ".xlsx"
    $wb.saveas($path, 51)
    $wb.close()
    $excel.Quit()

}

上面的代码将xls文件更改为xlsx 。 您需要添加用于将xlsx文件复制到目标文件夹的代码。