powered by simpleCommunicator - 2.0.60     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос про начало выполнения макроса
5 сообщений из 5, страница 1 из 1
Вопрос про начало выполнения макроса
    #32339265
super
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
C помощью макроса в Excell выполняю сохраненную процедуру:

sqlstring = "exec pavlov "

connstring = Sheets("Основной").Range("b2")

With ActiveSheet.QueryTables.Add(Connection:=connstring, _
Destination:=Range("a10"), Sql:=sqlstring)
.Refresh
End With
Application.CutCopyMode = False

затем нужно выполнить другой макрос. Подскажите, что нужно добавить в код, чтобы следующий макрос начал выполняться только после того как отработает процедура и результат вставиться в лист Excell.
...
Рейтинг: 0 / 0
Вопрос про начало выполнения макроса
    #32339492
Processor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
AfterRefresh Event

Occurs after a query is completed or canceled.

Syntax

Private Sub QueryTable_AfterRefresh(Success As Boolean)

Success True if the query was completed successfully.
...
Рейтинг: 0 / 0
Вопрос про начало выполнения макроса
    #32342196
Volodya
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
to Processor

Не получается прикрутить это событие к моему макросу, не мог бы ты обяснить применительно к моему случаю.
...
Рейтинг: 0 / 0
Вопрос про начало выполнения макроса
    #32342272
Processor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
1. Объяви статическую переменную типа RefreshIsFinished as ...
2. В QueryTable_AfterRefresh проанализируй Success и установи RefreshIsFinished в ненулевое, но значимое для тебя состояние.
3. Перед "затем нужно выполнить другой макрос" поставь:
Код: plaintext
1.
2.
3.
4.
DoEvents
While RefreshIsFinished= 0 
DoEvents
Wend

4. "Перед тем, как бить по воротам, сядь и подумай, а в те ли ворота ты бьёшь?!!!"
(М.Жванецкий, 1966 г.)
...
Рейтинг: 0 / 0
Вопрос про начало выполнения макроса
    #32343252
Processor
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Не получается прикрутить это событие к моему макросу
Если загвоздка именно в этом, создай свой класс, членом которого является
Код: plaintext
Private WithEvents myQueryTables As QueryTables  
...
Рейтинг: 0 / 0
5 сообщений из 5, страница 1 из 1
Форумы / Visual Basic [игнор отключен] [закрыт для гостей] / Вопрос про начало выполнения макроса
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


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