БМВ, это решение было за гранью моего понимания, спасибо.
Добавил строку Dim WshExec As Object (Run ругался на переменную), заработало.
Изучать еще и изучать...
Еще раз спасибо, вопрос решен.
Добавил строку Dim WshExec As Object (Run ругался на переменную), заработало.
Изучать еще и изучать...
Еще раз спасибо, вопрос решен.