| Вопрос: Как сохранить все открытые книги Экселя? | Добавлено: 26.04.07 13:46 |
Автор вопроса:  Сергей
|
|
Привет.
Перед командой Application.Quit необходимо вставить команду сохранения всех открытых книг в Экселе. А есть вообще такая команда? Или как можно закрыть Эксель с несохраненными данными? (как 1-й вариант есть отключение сообщений Экселя... но все же лучше все сохранить...) Спасибо. |
| Ответы | Всего ответов: 11 |
|
Номер ответа: 1 Автор ответа:  GSerg Вопросов: 0 Ответов: 1876 
|
Профиль | | #1 | Добавлено: 26.04.07 13:51 |
|
Нет такой команды.
Потому что программирование - это построение целого из частей. А не поиск готовой части, которая одновременно делает всё необходимое. Очевидно, перебрать все и сохранить каждую в отдельности. |
||
|
Номер ответа: 2 Автор ответа: Сергей Вопросов: 13 Ответов: 25 |
Профиль | | #2 | Добавлено: 26.04.07 16:02 |
| а как получить список имен открытых книг? | ||
|
Номер ответа: 3 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #3 | Добавлено: 26.04.07 17:23 |
| Зачем тебе, о странный мембер, список имён? Если есть коллекция самих книг? | ||
|
Номер ответа: 4 Автор ответа: СергейВопросов: 13 Ответов: 25 |
Профиль | | #4 | Добавлено: 27.04.07 08:42 |
о всемогущий  , что такое "коолеция книг"? Можно подробней...?
|
||
|
Номер ответа: 5 Автор ответа: ADSemenov.ru Вопросов: 5 Ответов: 276 |
Web-сайт: Профиль | | #5 | Добавлено: 27.04.07 11:30 |
|
For Each w In Workbooks
If w.Name <> ThisWorkbook.Name Then w.Close savechanges:=True End If Next w |
||
|
Номер ответа: 6 Автор ответа: ADSemenov.ruВопросов: 5 Ответов: 276 |
Web-сайт: Профиль | | #6 | Добавлено: 27.04.07 11:33 |
|
____ Это было закрыть все, окромя текущей.
____ А это просто все: For Each w In Workbooks
w.Close savechanges:=True Next w |
||
|
Номер ответа: 7 Автор ответа: СергейВопросов: 13 Ответов: 25 |
Профиль | | #7 | Добавлено: 27.04.07 12:04 |
| Спасибо, помогло... Люблю конкретные отчеты. | ||
|
Номер ответа: 8 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #8 | Добавлено: 27.04.07 14:27 |
| Которые взял и скопировал, не включая мозг ни на секунду? Да, это не ко мне... | ||
|
Номер ответа: 9 Автор ответа: ADSemenov.ruВопросов: 5 Ответов: 276 |
Web-сайт: Профиль | | #9 | Добавлено: 27.04.07 15:40 |
|
____ Это, видимо, ко мне.
____ Не знаю — обижаться или нет. Нверное — нет. ____ Сам был крутым ламером и очень хорошо понимаю таких мембер'ов |
||
|
Номер ответа: 10 Автор ответа: СергейВопросов: 13 Ответов: 25 |
Профиль | | #10 | Добавлено: 27.04.07 16:46 |
| GSerg извени, но ты всем так помогаешь? Или думаешь что кругом одни профи? Я б не был так критичен к людям... Я действительно стараюсь сначала разобраться сам а потом просить о помощи... Но я столкнулся впервые с такой конструкцией. Теперь у меня есть хоть направление в которм "капать", изучая данный метод, предложенный ADSemenov.ru, за что ему Спасибо. | ||
|
Номер ответа: 11 Автор ответа: GSergВопросов: 0 Ответов: 1876
|
Профиль | | #11 | Добавлено: 27.04.07 19:43 |
|
извени
Извини. GSerg извени, но ты всем так помогаешь?
Да, и тебе бы тоже помог; не хватило поста-двух. Опередили готовым кодом. С голубой каёмочкой. Или думаешь что кругом одни профи?
Ты думаешь, это код уровня профи? Ты неправ, это азбука объектно-ориентированного программирования, на котором VBA и построен. Поэтому и полезно раскрывать для себя сии базовые аспекты самостоятельно, вдруг увидев и поняв картину связей между объектами. Но я столкнулся впервые с такой конструкцией.
Как же удавалось избегать их до сих пор? Там других и нет, в общем-то. капать
Копать. предложенный
Не предложенный, а представленный в готовом виде. Дай человеку рыбу, ... |
||
Страница: 1 |