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

Вход

Регистрация

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

 

= Мир MS Excel/Макрос на обновление связей в книге из нескольких книг - Мир MS Excel

Старая форма входа
  • Страница 1 из 1
  • 1
Модератор форума: китин, _Boroda_  
Макрос на обновление связей в книге из нескольких книг
Nightv Дата: Четверг, 21.11.2013, 13:39 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
Добрый день , не получается с помощью
[vba]
Код
Private Sub Workbook_Open()
ActiveWorkbook.UpdateLink (ActiveWorkbook.LinkSources(xlOLELinks))
End Sub
[/vba]

обновить книгу, в которую приходят данные из 60 других книг ....
т.е. у меня есть дневные отчеты, и формируется и обновляется ежедневно 1 отчет - месячный ....
но с помощью данного макроса обновляется 1 часть данных а остальная выдает ошибку
хотелось бы что бы мне не приходилось каждый день прогружать файлы , если это возможно подскажите как это сделать

p.s. отчетность формируется из сводных таблиц


Сообщение отредактировал Nightv - Четверг, 21.11.2013, 13:54
 
Ответить
СообщениеДобрый день , не получается с помощью
[vba]
Код
Private Sub Workbook_Open()
ActiveWorkbook.UpdateLink (ActiveWorkbook.LinkSources(xlOLELinks))
End Sub
[/vba]

обновить книгу, в которую приходят данные из 60 других книг ....
т.е. у меня есть дневные отчеты, и формируется и обновляется ежедневно 1 отчет - месячный ....
но с помощью данного макроса обновляется 1 часть данных а остальная выдает ошибку
хотелось бы что бы мне не приходилось каждый день прогружать файлы , если это возможно подскажите как это сделать

p.s. отчетность формируется из сводных таблиц

Автор - Nightv
Дата добавления - 21.11.2013 в 13:39
Саня Дата: Четверг, 21.11.2013, 14:13 | Сообщение № 2
Группа: Друзья
Ранг: Ветеран
Сообщений: 1068
Репутация: 560 ±
Замечаний: 0% ±

XL 2016
Цитата
Remarks
When the UpdateLink method is called without any parameters, Excel defaults to updating all worksheet links.


можа так?
[vba]
Код
Private Sub Workbook_Open()
me.UpdateLink
End Sub
[/vba]
 
Ответить
Сообщение
Цитата
Remarks
When the UpdateLink method is called without any parameters, Excel defaults to updating all worksheet links.


можа так?
[vba]
Код
Private Sub Workbook_Open()
me.UpdateLink
End Sub
[/vba]

Автор - Саня
Дата добавления - 21.11.2013 в 14:13
Nightv Дата: Четверг, 21.11.2013, 15:40 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
выдает ошибку invalid use of me keyword
 
Ответить
Сообщениевыдает ошибку invalid use of me keyword

Автор - Nightv
Дата добавления - 21.11.2013 в 15:40
Саня Дата: Четверг, 21.11.2013, 15:45 | Сообщение № 4
Группа: Друзья
Ранг: Ветеран
Сообщений: 1068
Репутация: 560 ±
Замечаний: 0% ±

XL 2016
процедура Private Sub Workbook_Open() где находится?
 
Ответить
Сообщениепроцедура Private Sub Workbook_Open() где находится?

Автор - Саня
Дата добавления - 21.11.2013 в 15:45
Nightv Дата: Пятница, 22.11.2013, 09:14 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
простите чайника , но я не понял вопроса(
К сообщению приложен файл: 7430356.jpg (49.2 Kb)


Сообщение отредактировал Nightv - Пятница, 22.11.2013, 09:18
 
Ответить
Сообщениепростите чайника , но я не понял вопроса(

Автор - Nightv
Дата добавления - 22.11.2013 в 09:14
Nightv Дата: Пятница, 22.11.2013, 09:19 | Сообщение № 6
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
файл слишком большой прикрепить не могу поэтому добавил картинку
 
Ответить
Сообщениефайл слишком большой прикрепить не могу поэтому добавил картинку

Автор - Nightv
Дата добавления - 22.11.2013 в 09:19
Саня Дата: Пятница, 22.11.2013, 09:46 | Сообщение № 7
Группа: Друзья
Ранг: Ветеран
Сообщений: 1068
Репутация: 560 ±
Замечаний: 0% ±

XL 2016
замени me обратно на activeworkbook

я не понял вопроса(

в каком модуле, имелось ввиду.
судя по названию процедуры, это обработчик события "открытие книги" и соот-но, она д.б. расположена в объектном модуле "ЭтаКнига", и поэтому к книге (а это как раз ее модуль класса) можно просто обращаться - Me

т.к. возникла неведомая ошибка, процедура видимо "валяется" где-то в другом месте, которое я, собственно, и хотел выяснить...
 
Ответить
Сообщениезамени me обратно на activeworkbook

я не понял вопроса(

в каком модуле, имелось ввиду.
судя по названию процедуры, это обработчик события "открытие книги" и соот-но, она д.б. расположена в объектном модуле "ЭтаКнига", и поэтому к книге (а это как раз ее модуль класса) можно просто обращаться - Me

т.к. возникла неведомая ошибка, процедура видимо "валяется" где-то в другом месте, которое я, собственно, и хотел выяснить...

Автор - Саня
Дата добавления - 22.11.2013 в 09:46
Nightv Дата: Пятница, 22.11.2013, 10:24 | Сообщение № 8
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
теперь он обновляет то что прямыми ссылками прописано,
а вот данные сводных таблиц не хочет, можно как то это исправить?
К сообщению приложен файл: 3651937.jpg (100.8 Kb)
 
Ответить
Сообщениетеперь он обновляет то что прямыми ссылками прописано,
а вот данные сводных таблиц не хочет, можно как то это исправить?

Автор - Nightv
Дата добавления - 22.11.2013 в 10:24
Poltava Дата: Пятница, 22.11.2013, 14:29 | Сообщение № 9
Группа: Друзья
Ранг: Форумчанин
Сообщений: 232
Репутация: 50 ±
Замечаний: 0% ±

добавьте в код[vba]
Код
ActiveWorkbook.RefreshAll
[/vba]
 
Ответить
Сообщениедобавьте в код[vba]
Код
ActiveWorkbook.RefreshAll
[/vba]

Автор - Poltava
Дата добавления - 22.11.2013 в 14:29
Nightv Дата: Пятница, 22.11.2013, 14:55 | Сообщение № 10
Группа: Пользователи
Ранг: Новичок
Сообщений: 19
Репутация: 0 ±
Замечаний: 0% ±

Excel 2010
так же не обновляет....
 
Ответить
Сообщениетак же не обновляет....

Автор - Nightv
Дата добавления - 22.11.2013 в 14:55
  • Страница 1 из 1
  • 1
Поиск:

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