Вообщем, я в функции записываю значения переменных в .txt файл, затем запускаю внешний экзешник, которым читаю из этого файла переменные, выполняю расчет и записываю в др. текстовый файл результат. Далее читаю этот результат.
Если все это выполнять в одной функции:
1. запись в txt1
2. запуск exe -> запись в txt2
3. чтение из txt2
то получается, что 3-ий пункт выполняется до того как закончит выполняться 2-ой пункт.
Помогите пжлста.
Я сие реализовал так (нашел в форуме):

Private Const INFINITE = &HFFFF
Private Declare Function WaitForSingleObject Lib "kernel32" (ByVal hHandle As Long, ByVal dwMilliseconds As Long) As Long
Private Declare Function OpenProcess Lib "kernel32" (ByVal dwAccess As Long, ByVal fInherit As Integer, ByVal hObject As Long) As Long

Public Sub WaitForProcessToEnd(cmdLine As String)
'You can substitute a discrete time
'value in milliseconds for INFINITE.
Dim retVal As Long, pID As Long, pHandle As Long
pID = Shell(cmdLine, 0)
pHandle = OpenProcess(&H100000, True, pID)
retVal = WaitForSingleObject(pHandle, INFINITE)
End Sub

Private Sub BtnCalcNewRollAdjustment_Click()
'запись в файл
........
'конец записи в файл
WaitForProcessToEnd Dir + "PravkaProekt.exe"
'чтение из файла
........
'конец чтения из файла
End Sub

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

Реально exe-файл выполняется 1-3сек, но запуская его таким образом получается от 5сек до 5мин.

Да, и все это делается в VBA.

да нет....
это мне надо сделать, чтоб сначала екзешник, запущенный изи VBA, выполнился и записал в txt2, а потом уже VBA прочитал из txt2.
а то иначе получается, что екзешник еще не записал, а VBA уже читает из него!

:) сори, не понял ответа....
дело в том, что екзешник может еще не занять txt2, а VBA уже прочитать....