ник: ludmil
Вот кусок кода : хочу удалить файл после работы пользователей (его измняют и только печатают или сохраняют со своими именами).Не срабатывает так как процесс GetActiveWindow и переход к опросу dir идут параллельно .Если задерживаю работу в отладке - то все хорошо.Как запретить переход к следующему оператору за GETActive....
Или что-то делаю не так ...
str_pr = "Excel.exe " & imf
retval = Shell(str_pr, 1)
Call GetActiveWindow
If Dir(imf) <> "" Then
Kill imf
End If
If Dir(imf) = "" Then
MsgBox (imf & "удален ")
Else
MsgBox (imf & "не был закрыт Excel и файл придется удалять вручную")
End If
End If
Exit Sub