Тема: AHK: вставка скопированного с активным фильтром.
Добрый день! Подскажите, пож-та, как вставить строки с имеющимся активным фильтром, заранее спасибо!
FormatTime, TimeString, , dd.MM.yyyy
path_sv_ved = ......
ved = .......
Xl := ComObjCreate("Excel.Application")
svod_ved := Xl.Workbooks.Open(path_sv_ved)
Xl.Visible := True
If (svod_ved.Worksheets(1).FilterMode)
svod_ved.Worksheets(1).ShowAllData
svod_ved.Worksheets(1).Range("A1:AX1").AutoFilter(18, TimeString)
svod_ved.Worksheets(1).Range("A1:AX1").AutoFilter(16, "no" , xlAnd := 2, "yes")
vedom := Xl.Workbooks.Open(ved)
Xl.Visible := True
end := vedom.workSheets(1).Cells.(vedom.workSheets(1).Rows.Count, "A").End(xlUp := -4162).Row
vedom.workSheets(1).Range(vedom.workSheets(1).Cells(3,16), vedom.workSheets(1).Cells(end,17)).Copy
svod_ved.workSheets(1).cells.(......).PasteSpecial ?????????????????????????????????????????