changing the filename in a Link

B

Ben

Hi,

i have tryed but failed in writing a macro that would change the filename in
a link. I want my users to enter the file name in a cell on one sheet and
then press a button to change the filename in all links in the workbook.

can any one help me?

THX
 
D

Don Guillett

Sub ChangeLinks()
ActiveWorkbook.ChangeLink Name:="menu.xls", _
NewName:="wiebe.xls", Type:=xlExcelLinks
End Sub
or
NewName:=range("a1").value, Type:=xlExcelLinks
 
Top