Update and then break external links to another workbook
Hi everyone!
I am new in VBA, but I have a short procedure to break all external links in the currently active workbook.
Is there any option to firstly update all external links and only then break them?
Sub BreakLinks()
Dim Links As Variant
Dim i As Integer
With ActiveWorkbook
Links = .LinkSources(xlExcelLinks)
If Not IsEmpty(Links) Then
For i = 1 To UBound(Links)
.BreakLink Links(i), xlLinkTypeExcelLinks
Next i
End If
End With
End Sub
Thanks for the help in advance!
ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources
Hope this helps
Sometimes its best to start at the beginning and learn VBA & Excel.
Please dont ask me to do your work for you, I learnt from Reading books, Recording, F1 and Google and like having all of this knowledge in my head for the next time i wish to do it, or wish to tweak it.
Available for remote consultancy work PM me
Try this..
Please Login or Register to view this content.
Surround your VBA code with CODE tags e.g.;
[CODE]your VBA code here[/CODE]
The # button in the forum editor will apply CODE tags around your selected text.
Thanks for the help!
AlphaFrog, i have issue with your procedure...Once i run the macro, it asks me with dialog window to show the location of the file (data to be updated from).
And same repeated with each link.
How can i avoid it?
I don't follow what you are describing.Originally Posted by tatiana_
Are you asking that the code is displaying a file dialog and you want to cancel it and exit the procedure? If yes, show that part of your code.
Thank you, AlphaFrog =)
the issue is solved...previous file contains a link to a non existing file, thats why it asked to show the location.
thanks for the help!
Regards,
Tanya
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
Bookmarks