activeWorkBook.Close на вылет

[tolikman]

Ситуация: осталась одна открытая книга, в ней, по нажатии на соответствующую графику, выполняется следующий код:

sub Закрыть()
activeWorkBook.Close SaveChanges:=false
end sub

сама книга закрывается нормально, но когда начинает закрываться сам EXCEL (2007 лицензия и не лицензия), он же и вылетает, потом открывается пытаясь восстановиться и т.д. и т.п.. Сотрудники падают в обморок и рвут тел трубки названивая мне и спрашивая "что делать!?" , а действительно что делать!? . ЗАРАНЕЕ ИЗВИНИТЕ ЕСЛИ ПОХОЖАЯ ТЕМА ЕСТЬ, я искал, не нашол.
И заодно сколько ссылок можно передать в Range типа "A1:A2,B1:B2, . . . ,X1:X2" Буду презнателен.

[VictorM]

Попробуйте написать так

Sub Закрыть()
    Application.Quit
    ActiveWorkbook.Close SaveChanges:=False
End Sub

у меня работает.

[дмидми]

Можно ещё попробовать предварительно сказать
ActiveWorkbook.Saved = True

[tolikman]

сработало так:

sub xxx()
book.save
book.saved = true
book.application.quit
end sub

большое спасибо !!!