Запуск макроса

[kaa1977]

Прошу помощи!

Проблема такая:
мой шаблон с макросом заполняет внешний источник,
он запускает excel, открывает мой шаблон, заполняет его,
а затем должен включится мой макрос.

И вот это у меня не получается.

если я использую:
Private Sub Workbook_Open()
мой_макрос()
End Sub
то в этом случае макрос начинает работать сразу по открытии шаблона, когда он ещё пустой.

если я использую:
Workbook_SheetChange работает не так как хотелось бы:
книга заполняется, но макрос начинает работать, если я сам внесу в любую ячейку изменения
(почему он не запускается при внесении изменений извне - я не понял...)


Единственное, что мне удалось, это задержка на запуск макроса:
Private Sub Workbook_Open()
Application.OnTime Now + TimeValue("00:00:05"), "мой_макрос"
End Sub


но может есть другие способы, более рациональные?!


СПАСИБО!

[vikttur]

Сообщение от kaa1977

...он запускает excel, открывает мой шаблон, заполняет его...

Запускать макрос после заполнения последней ячейки шаблона.
Т.е. отследить изменение ячейки.

[kaa1977]

Правильно ли я понимаю, что необходимо использовать

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)

End Sub

???

Но как задать заполняемую область (Target)???

[SAS888]

он запускает excel, открывает мой шаблон, заполняет его...

Раз Ваш внешний источник все это делает, то почему бы ему самому не запустить требуемый макрос?
Пусть, например, требуется открыть файл "Книга1.xls" и запустить имеющийся в ней макрос с именем "Macro1":

Sub Main()
    Workbooks.Open ("Книга1.xls")
    Run "Книга1.xls!Macro1"
End Sub

Естсственно, что перед запуском макроса, Вы можете сделать любые требуемые действия.

[kaa1977]

Сообщение от SAS888

Раз Ваш внешний источник все это делает, то почему бы ему самому не запустить требуемый макрос?

К сожалению, у меня такая ситуация, что внешний источник
мне не подвластен, и я работаю с тем, что сделано до меня...

Собственно, можно было бы сделать "волшебную кнопку" (данные выгружаются в мой шаблон, где есть эта кнопка, и по ней производятся вычисления), но хочется автоматизировать, сделать, чтобы по выгрузке автоматически шли рассчёты...

[Hugo121]

Попробуйте использовать событие Calculate - по этому событию анализируйте одну ячейку шаблона на определённое значение, которое будет высчитываться Вашей формулой после полного заполнения шаблона.
Например, должно получиться число 10 по заполнении 10 полей или что-нибудь такое.
Или может быть просто хватит одного Calculate - если сторонний процесс сперва пересчёт отключает, потом в конце занесения данных включает.