更新 Excel 文件中的链接

Question

我正在尝试修改一些链接到其他 Excel 文件的 Excel 文件。

链接到的文件位于子目录中。我要将所有文件移动到根目录，然后运行脚本来更改链接。

我能够在每个文件中找到链接，但我无法修改它们（见下文）

有什么想法吗？

谢谢

P

#get all the excel files in the directory

Get-ChildItem $sourceDir -Filter *.xl* |

Foreach-Object {

write-host -ForegroundColor Yellow $_.FullName



$workbook = $excel.Workbooks.Open($_.FullName)



foreach ($link in $workbook.LinkSources(1))

{

write-host $link.Address

#this gives me .... C:\temp\files\childfile1.xlsx etc

# $link.Address seems to be read only?

#$link.Address = $newLink

#this doesn't seem to work either ...

#$workbook. .ChangeLink($link,$newlink,1)

}





#$workbook.Save()

$workbook.Close()

Answer 1

如果您正在修改 XLSX 文件，您可以在不使用 Excel 的情况下更新链接。最终，这些是具有不同扩展名的 zip 存档。如果您创建文件的副本以具有 ZIP 扩展名，则可以使用 Expand-Archive 访问各种文件并相应地更新它们，然后 Compress-Archive 生成​​一个新的 Excel 文件。

在存档中，查找 /workbook.xml，它将按名称识别工作表。 /rels/workbook.xlm.rels 可用于从 sheetId 转换为工作表（目标），/worksheets 中的文件（例如“worksheets/sheets3.xml”），您可以推断关系文件，该文件将在 /工作表/_rels（例如 /worksheets/_rels/sheet3.xml）。

使用工作表，您可以使用 ref 属性找到基于单元格引用的关联超链接，该属性为您提供 r:id 属性。我们可以使用此值通过 Id 查找适当的关系。然后，您需要适当地更新 Target。

当然，如果您知道原始链接，并且它是唯一的（或者您以相同的方式更改它们），您可以在 .rels 文件中进行搜索和替换。

保存更改后，您只需创建新文件，您可以使用 Compress-Archive 来完成。您需要对扩展名为 .Zip 的文件执行此操作，然后重命名。

---

这是一个基于 XSLX 的示例，第一个工作表上带有指向 Yahoo 的链接（注意：前 3 个工作表通常具有 XML 和工作表名称匹配，直到更改。不要指望生产)

copy-item c:\temp\links.xlsx c:\temp\links.zip 
expand-archive c:\temp\links.zip c:\temp\links_zip
$content = get-content c:\temp\links_zip\xl\worksheets\_rels\sheet1.xml.rels -raw # allow file to close
$content |  %{ $_ -replace 'http://www.yahoo.com','http://www.google.com'} | set-content c:\temp\links_zip\xl\worksheets\_rels\sheet1.xml.rels
compress-archive c:\temp\links_zip\* c:\temp\links_alt.zip 
remove-item c:\temp\links_zip -Recurse
rename-item c:\temp\links_alt.zip c:\temp\links_alt.xlsx
c:\temp\links_alt.xlsx