Excel链接不断崩溃[已关闭]

but5z9lq  于 2023-01-31  发布在  其他
关注(0)|答案(1)|浏览(99)

已关闭。此问题需要超过focused。当前不接受答案。
**想要改进此问题吗?**更新此问题,使其仅关注editing this post的一个问题。

昨天关门了。
Improve this question
我妈妈的机器很慢,所以excel总是死机。当它死机时,它会把她工作表中的所有100个链接都改到漫游文件夹中,并断开链接。她有一个母版工作表链接到100个不同的工作簿。文档被数字标记为1-100。而且我必须进去手动将每个链接改回现有的文件夹。有没有什么方法可以用VBA做到这一点,这样我就可以在发生这种情况时为她把宏链接到一个按钮上。所有的工作簿总是包含在同一个文件夹中。
我已经在谷歌上搜索了一吨,但没有能够找到任何合适的接近我所需要的。所以这是从头开始

mklgxw1f

mklgxw1f1#

可以编写VBA宏,以便在主图纸中的链接断开时将链接改回现有文件夹。

Sub UpdateLinks()
    Dim wb As Workbook
    Set wb = ThisWorkbook

    Dim lnk As Variant
    For Each lnk In wb.LinkSources(xlExcelLinks)
        wb.ChangeLink Name:=lnk, NewName:=Replace(lnk, "Roaming", "Existing")
    Next lnk
End Sub

相关问题