View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Allllen Allllen is offline
external usenet poster
 
Posts: 341
Default Ignoring code to shut a workbook if it is already shut

Test if the workbook is still open first:

Dim wbTest As Workbook
on error resume next
Set wbTest = Workbooks("Bund Current Payoff.xls")
on error goto 0

If Not wbTest Is Nothing Then Workbooks("Bund Current Payoff.xls").Close
SaveChanges:=True

wbTest will be Nothing if it wasn't already open

--
Allllen


"Cammy" wrote:

I have some coding which closes and saves workbooks;
Workbooks("Bund Current Payoff.xls").Close SaveChanges:=True etc

but I want the code not to have an error and have a problem if the file has
already been closed when the code is run.

How do I get around this problem?