Excel中的更新链接提示仍然显示
我有这个代码的问题。 即使我已经包含这些代码,Excel仍然显示更新链接提示:
Workbooks(ActiveWorkbook.Name).UpdateLinks = xlUpdateLinksNever AppExcel.AskToUpdateLinks = False
我做错了吗?
这是我的代码片段:
ActiveWorkbook.SaveCopyAs dirName & "\" & folderName & "\" & ActiveWorkbook.Name Workbooks(ActiveWorkbook.Name).UpdateLinks = xlUpdateLinksNever AppExcel.AskToUpdateLinks = False Workbooks(ActiveWorkbook.Name).Close False
谢谢!
我已经明白了! :)但是,感谢您的帮助。 我只需要把UpdateLinks:=True
Set wb = Workbooks.Open(fileName:=fileName, UpdateLinks:=True)
试试这个:
Sub Auto_Open() UpdateLinks = xlUpdateLinksNever AskToUpdateLinks = False End Sub