Severing links to list names when moving sheets between workbooks

R

Roger on Excel

When I move sheets to another spreadsheet, is there a way to automatically
sever the links so that it doesnt keep asking about list names?


Can anyone advise of direct me?

Thanks,Roger
 
J

john

Roger,
see if this works for you.

Sub RemoveLinks()
Dim Link As Variant

With ActiveWorkbook

For Each Link In .LinkSources

.BreakLink Name:=Link, Type:=xlLinkTypeExcelLinks

Next

End With

End Sub
 
Top