VBA - Close window

Question

I have a macro that creates 17 workbooks in a loop. When it's done working on a workbook it closes it and goes to the next with:

ActiveWorkbook.Save
ActiveWindow.Close

This has always worked fine until recently. Suddenly on loop nr. 7 it say (the 6 loops before still working fine):

Run-time '-2147417848 (80010108)':

Method 'Close' of objekt 'Window' failed

I can delete "ActiveWindow.Close" and close all the workbooks manually to make the macro work. But still...

Any knows why it does this?

It can be related to language settings, have you added any languages or fonts recently? Or upgraded with a Service Pack? Here's a page that talks about some of the possibilities, but depends on what your code is doing. — Lance Roberts
– Lance Roberts, Commented Aug 26, 2011 at 8:58

Fionnuala · Accepted Answer · 2011-08-26 09:27:14Z

5

As per comment.

A wait period may solve this problem.

answered Aug 26, 2011 at 9:27

Fionnuala

91.5k7 gold badges121 silver badges155 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

Gaijinhunter · Accepted Answer · 2011-08-26 09:23:36Z

4

I'm not sure why you are using ActiveWindow.Close, perhaps that has something to do with it. The proper way to close a book (as far as I know) is:

Workbooks(excelFile).Close SaveChanges:=True

Sometimes some wacky things happen when refering to the active object, so it's best to be explicit.

answered Aug 26, 2011 at 9:17

Gaijinhunter

14.7k4 gold badges53 silver badges58 bronze badges

Jonathan · Accepted Answer · 2015-10-29 19:07:12Z

0

I use the number of the window... i.e. I know this will be Window #1, so I refer to it that way. Example:

Windows(1).Close SaveChanges:=False

answered Oct 29, 2015 at 19:07

Jonathan

1