Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как модернизировать макрос "закрыть все книги" - Страница 2 - Мир MS Excel

Старая форма входа
  • Страница 2 из 2
  • «
  • 1
  • 2
Модератор форума: китин, _Boroda_  
Как модернизировать макрос "закрыть все книги"
micholap_denis Дата: Суббота, 25.09.2021, 22:29 | Сообщение № 21
Группа: Проверенные
Ранг: Обитатель
Сообщений: 341
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
файл который не требуется закрывать в формате.xlsb
прописываю в макросе...
If wb.Name<>"111.xlsb" Then wb.Close False
этот файл и закрывает а остальные открыты
 
Ответить
Сообщениефайл который не требуется закрывать в формате.xlsb
прописываю в макросе...
If wb.Name<>"111.xlsb" Then wb.Close False
этот файл и закрывает а остальные открыты

Автор - micholap_denis
Дата добавления - 25.09.2021 в 22:29
Pelena Дата: Воскресенье, 26.09.2021, 08:24 | Сообщение № 22
Группа: Админы
Ранг: Местный житель
Сообщений: 19404
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
Книгу с макросом тоже надо исключить. Если она закроется, то и макрос перестанет работать, наверное


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
СообщениеКнигу с макросом тоже надо исключить. Если она закроется, то и макрос перестанет работать, наверное

Автор - Pelena
Дата добавления - 26.09.2021 в 08:24
micholap_denis Дата: Воскресенье, 26.09.2021, 17:41 | Сообщение № 23
Группа: Проверенные
Ранг: Обитатель
Сообщений: 341
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Pelena,
так файл который исключаем - 111 в нем и есть макрос
 
Ответить
СообщениеPelena,
так файл который исключаем - 111 в нем и есть макрос

Автор - micholap_denis
Дата добавления - 26.09.2021 в 17:41
Pelena Дата: Воскресенье, 26.09.2021, 19:42 | Сообщение № 24
Группа: Админы
Ранг: Местный житель
Сообщений: 19404
Репутация: 4555 ±
Замечаний: ±

Excel 365 & Mac Excel
Цитата micholap_denis, 26.09.2021 в 17:41, в сообщении № 23 ()
в нем и есть макрос

Вариант
[vba]
Код
For Each wb In Workbooks ' перебираем все открытые книги
If wb.Windows(1).Visible Then If Not wb Is ThisWorkbook Then wb.Close False
Next wb
[/vba]


"Черт возьми, Холмс! Но как??!!"
Ю-money 41001765434816
 
Ответить
Сообщение
Цитата micholap_denis, 26.09.2021 в 17:41, в сообщении № 23 ()
в нем и есть макрос

Вариант
[vba]
Код
For Each wb In Workbooks ' перебираем все открытые книги
If wb.Windows(1).Visible Then If Not wb Is ThisWorkbook Then wb.Close False
Next wb
[/vba]

Автор - Pelena
Дата добавления - 26.09.2021 в 19:42
micholap_denis Дата: Воскресенье, 26.09.2021, 21:13 | Сообщение № 25
Группа: Проверенные
Ранг: Обитатель
Сообщений: 341
Репутация: 0 ±
Замечаний: 60% ±

Excel 2013
Pelena,
то что нужно!
спасибо вам
 
Ответить
СообщениеPelena,
то что нужно!
спасибо вам

Автор - micholap_denis
Дата добавления - 26.09.2021 в 21:13
  • Страница 2 из 2
  • «
  • 1
  • 2
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!