Тема: AHK: Сохранение .xlsx
Добрый день! Подскажите пож-та, возможно ли после открытия экселевского файла, и выполнения операций кода в конце происходило "сохранить как" в туже директорию, откуда он открывался и с тем же именем+дополнение, например. файл был - "....... 01 апреля.xlsx", а после сохранялся в новый файл в туже папку "....... 01 апреля_проверено.xlsx"
Шапка кода:
SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory.
$^1::
Setkeydelay, 35
Loginname =
Password =
ie := ComObjCreate("InternetExplorer.Application")
ie.Visible := true
ie.Navigate(".....")
while ie.readystate <> 4
continue
ie.document.getElementsByTagName("input")[0].value := Loginname
ie.document.getElementsByTagName("input")[1].value := Password
ie.document.getElementsByTagName("input")[2].click()
Sleep 2000
ie.document.getElementsByTagName("a")[0].click()
; Выбор экселевскгого файла для проверки
FileSelectFile, Path, 3, , Open Excel File, Excel File (*.xls; *.xlsx)
if Path =
ExitApp
Xl := ComObjCreate("Excel.Application")
Xl.Workbooks.Open(Path) ;open an existing file
Xl.Visible := True
if Errorlevel
{
MsgBox, % "Error opening excel file! Exiting..."
ExitApp
}
MsgBox, % "Сделано!"
ExitApp