Option explicit
Sub ref()
Dim myList as variant
dim iCtr as long
dim TestStr as string
dim FoundIt as boolean

mylist = array("F:\Primary\Master-May.xls", _
"G:\Primary\Master-May.xls", _
"H:\Primary\Master-May.xls")

foundit=false
for ictr = lbound(mylist) to ubound(mylist)
teststr = ""
on error resume next
teststr = dir(mylist(ictr))
on error goto 0

if teststr = "" then
'not found, keep looking
else
foundit = true
ActiveWorkbook.UpdateLink Name:=mylist(ictr), Type:=xlExcelLinks
exit for
end if
next ictr

if foundit = false then
msgbox "not found in any of those places!"
else
msgbox "Updated!
end if

End Sub

Kashyap wrote:

I have the below code live.. but can I have a code that search in drive F, G,
H if this path does not exist?

That is it should search in
"F:\Primary\Master-May.xls", _
"G:\Primary\Master-May.xls", _
"H:\Primary\Master-May.xls", _

Sub ref()

ActiveWorkbook.UpdateLink Name:= _
"E:\Primary\Master-May.xls", _
Type:=xlExcelLinks

End Sub

--

Dave Peterson