powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблема
4 сообщений из 4, страница 1 из 1
Проблема
    #34430570
shadow_sw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Доброго времени суток!
Столкнулся со следующей проблемой:
необходимо чтобы при нажатии на кнопку открывался файл и данные в нем обновлялись. Написал макрос, при первом открытии данные принимаются, при дальнейших попытках обновить макрос обновления не запускается.

Private Sub CommandButton1_Click()
Application.Workbooks.Open Filename:="c:\temp\файл.xls"
Workbooks("файл.xls").Activate
Application.Workbooks("файл.xls").Close SaveChanges:=True
End Sub

Запуск макроса при открытии осуществляется следующим образом:

Private Sub Auto_Open()
Макрос
End Sub

Так вот. Если же файл закрыть и открыть вручную - макрос запускается. Помогите разобраться в чем причина?

За ранее спасибо.
...
Рейтинг: 0 / 0
Проблема
    #34430639
Фотография Antonariy
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
А эскселю пофиг как открывается файл - если в нем есть Auto_Open() и разрешен запуск, то он будет выполнен.
...
Рейтинг: 0 / 0
Проблема
    #34430707
Granata005
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Нужно запускать так:
Workbooks.Open Filename:="C:\02.07.ГЛ.КНИГА СВОД.xls", UpdateLinks:=xlUpdateLinksAlways
...
Рейтинг: 0 / 0
Проблема
    #34432813
shadow_sw
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
AntonariyА эскселю пофиг как открывается файл - если в нем есть Auto_Open() и разрешен запуск, то он будет выполнен.
вот тут ты не прав - есть список ранее открытых файлов. А есть новый сеанс...так что есть подозрение, что при открытии документа, он вызывается из списка ранее открытых файлов
...
Рейтинг: 0 / 0
4 сообщений из 4, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Проблема
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]