Hi,

Code:
jet = InputBox("Please key in the range example Q:Q", "Column to Grab")
mypath = InputBox("File Location", "Jen")
fname = Dir(mypath & "\" & "*.xls")
Do While Len(fname) > 0
Set wb = Workbooks.Open(mypath & "\" & fname)

'i do all my stuff here

wb.Activate
wb.Close

fname = Dir

Loop
The above code is to grab all the files in a folder and when it is grabbing all the files, it will prompt up whether i wanted to update the link. I have 100+ files that I need to open and i need to click 100+ times "Don't Update".

I've tried "Select Case" and "Update Link = 0", i just don't get it right. hope someone can help me..thankss