Путь к активной папке Excel VBA и переименование файла - PullRequest
Новая
       8

Путь к активной папке Excel VBA и переименование файла

0 голосов
/ 05 октября 2018

Я делаю сценарий, который загружает файлы из Интернета.Я заставил его работать в той части, где он загружает файл и открывает его в каталоге Windows.

Мне нужно знать, где находится это местоположение каталога, чтобы я мог изменить имя и сохранить его в другом месте.. 

ie.document.getElementByID("FactuurnummerTextBox").Value = Decl


ie.document.getElementByID("zoekenOpDeclaratiedetailsButton").Click

Do While .busy
    DoEvents
Loop

Do While .readystate <> 4
    DoEvents
Loop

ie.document.getElementByID("btnSelectDeclaratie").Click

Do While .busy
    DoEvents
Loop

Do While .readystate <> 4
    DoEvents
Loop

ie.document.getElementByID("DownloadImage").Click

Do While .busy
    DoEvents
Loop

ie.document.Focus

Application.Wait (Now() + TimeValue("0:00:01"))

ie.document.Focus


ie.findWindowEx(ie.document, 0, "View Downloads - Internet Explorer",       vbNullString).Click

SendKeys "{TAB}", True
SendKeys "~", True

Затем откроется окно сохранения как.

(извините за ключи отправки .... У меня проблема с панелью уведомлений загрузчика)

...