ExcelBanter - Link Formulas

I don't believe there is a way to dismiss the dialog via code. Why not have
your macro open up the target workbook and see if the worksheet is there
before you write a formula referencing it? If you are concerned about
screen activity, you can use

application.screenupdating = false

to hide screen activity, and set back to true to show activity.

To see if a sheet exists once you open the workbook, do something like:

dim oS as worksheet
on error resume next
set oS = worksheets("somesheetname")
on errror goto 0
if os is nothing then
'code to handle no sheet exists
end if

To close the target workbook and not save, use

workbooks("Job Analysis 2003.xls").close false

Robert Flanagan
Macro Systems
Delaware, U.S. 302-234-9857
http://www.add-ins.com
Productivity add-ins and downloadable books on VB macros for Excel

"Jeannie Flores" wrote in message
...
Please help...

I have been looking for a solution to this problem for a
couple of years now.. but can't seem to get around it..

I have a workbook ([Job Analysis 2004.xls]) with macro
that I run that:

1. Copies a mastersheet within the workbook to a new
sheet.

2. Sets new name of the sheet, let say "04-500"

3. Using the variable LstYrMat"='[Job Analysis 2003.xls]"
& JobNo & "'!$B$23, I create a formula in a cell to link
to sheet "04-500" in last years workbook ([Job Analysis )
2003.xls]"

My problem is that if the sheet did not exist in last
years workbook, when I set the formula in the cell, I get
the "Select Sheet" dialog box. I can't seem to find a way
to dismiss the dialog box programmatically. The user has
to sit there and hit cancel several times.

Any help I can get would be greatly, greatly appreciated.

Jeannie Flores