Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 03.03.2011, 20:06   #1
Lopatin
Новичок
Джуниор
 
Регистрация: 03.03.2011
Сообщений: 3
По умолчанию Закрыть файл макросом (массив)

Подскажите, пожалуйста.

как можно закрыть книгу в конце цикла?

имеется несколько файлов из которых вытягиваются поочереди данные, циклом

Workbooks.Open Filename:=FilesToOpen(x)

как закрыть открытый файл из этого массива, с которым работал цикл? Без сохранения, хотя и можно с сохранением - не принципиально! При этом книга из которой макрос работает нужно оставить открытой.

Заранее спасибо за помощь!
Lopatin вне форума Ответить с цитированием
Старый 03.03.2011, 20:11   #2
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Код:
Set WB=Workbooks.Open Filename:=FilesToOpen(x)
-------------------------------------
------------------------------------
WB.Close(False)
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 03.03.2011, 20:18   #3
Lopatin
Новичок
Джуниор
 
Регистрация: 03.03.2011
Сообщений: 3
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Код:
Set WB=Workbooks.Open Filename:=FilesToOpen(x)
-------------------------------------
------------------------------------
WB.Close(False)

ошибку пишет в ответ на такой код

Set WB=Workbooks.Open Filename:=FilesToOpen(x)

syntax error

не подскажите, в чем дело?
Lopatin вне форума Ответить с цитированием
Старый 03.03.2011, 20:20   #4
doober
Старожил
 
Аватар для doober
 
Регистрация: 02.05.2009
Сообщений: 3,907
По умолчанию

Код:
Set WB=Workbooks.Open (Filename:=FilesToOpen(x))
Анализ,обработка данных Недорого
doober вне форума Ответить с цитированием
Старый 03.03.2011, 20:23   #5
IgorGO
Новичок
СтарожилДжуниор
 
Аватар для IgorGO
 
Регистрация: 05.02.2008
Сообщений: 9,487
По умолчанию

написано же syntax error - дело в синтаксисе, а сами, без доброго дяди Сережи - никак?
он по две клавиатуры в месяц раздабливает, пока вам ответы пишет
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете

Последний раз редактировалось IgorGO; 03.03.2011 в 20:26.
IgorGO вне форума Ответить с цитированием
Старый 03.03.2011, 20:24   #6
Lopatin
Новичок
Джуниор
 
Регистрация: 03.03.2011
Сообщений: 3
По умолчанию

Цитата:
Сообщение от doober Посмотреть сообщение
Код:
Set WB=Workbooks.Open (Filename:=FilesToOpen(x))
Спаааасибо!
Lopatin вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
открытие нескольких книг одним макросом и закрытие книг другим макросом kursant95 Microsoft Office Excel 6 27.01.2011 16:54
Как закрыть файл при закрытии программы r_yevgeniy Общие вопросы Delphi 3 23.03.2010 11:28
Не записываеться массив в файл (С) Айдар Помощь студентам 3 28.02.2010 22:17
Почему после обработки макросом файл становится больше? garik64 Microsoft Office Word 7 21.09.2009 13:16
Диалоги открыть/закрыть файл Altera Операционные системы общие вопросы 3 03.12.2008 01:18