excel - 断开工作簿的链接而不断开每个链接？

Question

我正在尝试使用 for each 循环断开外部工作簿链接，但是当我重新打开新文件时它似乎不起作用；我注意到每次迭代都会弹出外部链接。

我究竟做错了什么？wbkTarget是我从外部 wb 存放工作表的新工作簿。

Dim link As Variant: link = wbkTarget.LinkSources(Type:=xlLinkTypeExcelLinks)
If Not IsEmpty(wbkTarget.LinkSources(xlExcelLinks)) Then
    For Each link In wbkTarget.LinkSources(xlExcelLinks)
        wbkTarget.BreakLink link, xlLinkTypeExcelLinks
    Next link
End If

标签： excelvba