Search found 89 matches

by inseption86
27 Mar 2020, 07:04
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

Like this: index := 1 loop, 23 ;% chet { vedom.workSheets(1).Range(vedom.workSheets(1).Cells(2+index,16), vedom.workSheets(1).Cells(2+index,24)).Copy index++ if svod_ved.workSheets(1).Cells(1+index,1).EntireRow.Hidden = 0 { svod_ved.workSheets(1).Range(svod_ved.workSheets(1).Cells(1+index,21), svod...
by inseption86
27 Mar 2020, 06:55
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

I want to paste the copied cells into a table that has a filter If (svod_ved.Worksheets(1).FilterMode) { svod_ved.Worksheets(1).ShowAllData } svod_ved.Worksheets(1).Range("A1:AX1").AutoFilter(18, OutputVar) svod_ved.Worksheets(1).Range("A1:AX1").AutoFilter(16, "*РВП*" , xlAnd := 2, "*ВЖ*") end := ve...
by inseption86
27 Mar 2020, 06:52
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

The way you’ve shown it will only increase it relative to what A_Index’s value is through that iteration. If you want total control of it, don’t base it on A_Index. Set Index equal to 1 before the start of the loop, then you can increase its value by more than one during each iteration of the loop,...
by inseption86
27 Mar 2020, 06:45
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

You can’t. As I said, if you want a variable that increases by more than one during an iteration of a loop, create your own, such as Index. Then you can increase it however you want depending on what happens during the loop. how? loop, 23 ;% chet { vedom.workSheets(1).Range(vedom.workSheets(1).Cell...
by inseption86
27 Mar 2020, 06:41
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

loop, 23 ;% chet { vedom.workSheets(1).Range(vedom.workSheets(1).Cells(2+A_index,16), vedom.workSheets(1).Cells(2+A_index,24)).Copy index := A_index ???????????????????????? if svod_ved.workSheets(1).Cells(1+A_index,1).EntireRow.Hidden = 0 { svod_ved.workSheets(1).Range(svod_ved.workSheets(1).Cells...
by inseption86
27 Mar 2020, 06:39
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

Re: how to add A_Index Topic is solved

I want to increase A_index by + 1, after the condition "else", but i not know how to do it
by inseption86
27 Mar 2020, 06:26
Forum: Ask For Help
Topic: how to add A_Index Topic is solved
Replies: 12
Views: 403

how to add A_Index Topic is solved

hi, please help loop, 23 ;% chet { vedom.workSheets(1).Range(vedom.workSheets(1).Cells(2+A_index,16), vedom.workSheets(1).Cells(2+A_index,24)).Copy if svod_ved.workSheets(1).Cells(1+A_index,1).EntireRow.Hidden = 0 { svod_ved.workSheets(1).Range(svod_ved.workSheets(1).Cells(1+A_Index,21), svod_ved.wo...
by inseption86
27 Mar 2020, 01:21
Forum: Ask For Help
Topic: Excel_how to paste copied rows into a table having a filter
Replies: 6
Views: 698

Re: Excel_how to paste copied rows into a table having a filter

This example is not suitable for me, first I have to use a filter in one table, then copy data from two other tables and paste it into the original table that has a filter. Here I am doing this macro now Option Explicit модуль Dim rCopyRange As Range Sub My_Copy() If Selection.Count > 1 Then Set rCo...
by inseption86
22 Mar 2020, 08:14
Forum: Ask For Help
Topic: Excel_how to paste copied rows into a table having a filter
Replies: 6
Views: 698

Re: Excel_how to paste copied rows into a table having a filter

how to Paste to Visible Cells in Excel ?
by inseption86
15 Mar 2020, 09:06
Forum: Ask For Help
Topic: Excel_how to paste copied rows into a table having a filter
Replies: 6
Views: 698

Excel_how to paste copied rows into a table having a filter

Hi, how to paste copied rows into a table having a filter FormatTime, TimeString, , dd.MM.yyyy Xl := ComObjCreate("Excel.Application") book := Xl.Workbooks.Open("....") Xl.Visible := True book.workSheets(1).Range("A1", "A" . book.workSheets(1).UsedRange.Rows.Count).Copy book2 := Xl.Workbooks.Open("....
by inseption86
21 Dec 2019, 07:00
Forum: Ask For Help
Topic: GUI, change text tab Topic is solved
Replies: 1
Views: 219

GUI, change text tab Topic is solved

hi guys, tell me, please, how to change the text of the tab?

Code: Select all


Gui, Add, Tab2, vTab , 1|2|3
Loop 3
{
     Gui, Tab, % A_Index
 }
gui, show
return


space::
Gui, Submit, NoHide
GuiControlGet, ThisTab,, Tab
return

by inseption86
17 Dec 2019, 08:33
Forum: Ask For Help
Topic: GuiControl, Disable, % var
Replies: 1
Views: 224

GuiControl, Disable, % var

Hi guys, the buttons are locked only on the first tab, but how to make sure that the rest are blocked Gui, +ToolWindow +AlwaysOnTop Gui, Add, Tab2, vTAB,` 2 | 3 | 4 | loop 3 { Gui, Tab, %A_index% Loop { FileReadLine, line, S:\Смирнов\1_smen.txt, %A_Index% if ErrorLevel break Gui, Add, Button, gGetNa...
by inseption86
03 Nov 2019, 13:58
Forum: Ask For Help
Topic: AHK: Loop_folder
Replies: 3
Views: 579

Re: AHK: Loop_folder

I wrote incorrectly. I have a directory ( Folder := "C:\Users\smirnovaa\Desktop\1" ), where the folders are located, for example, Smirnov A, Petrov S, Sidorov U .... Also in the catalog there is a folder "~ GRD" ( Folder := "C:\Users\smirnovaa\Desktop\1"\~ГРД" ) , it also contains folders (Ivanov Sh...
by inseption86
03 Nov 2019, 10:58
Forum: Ask For Help
Topic: AHK: Loop_folder
Replies: 3
Views: 579

AHK: Loop_folder

Hi, I want get % A_LoopFileFullPath after loop and gui, please help! #NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases. ; #Warn ; Enable warnings to assist with detecting common errors. SendMode Input ; Recommended for new scripts due to its superior speed and re...
by inseption86
18 Oct 2019, 03:28
Forum: Ask For Help
Topic: Ahk: excel_com
Replies: 0
Views: 347

Ahk: excel_com

Hi guys, tell me how to simplify this code, something is a loop in a loop ie := ComObjCreate("InternetExplorer.Application") ie.Visible := true ie.Navigate("************") while ie.readystate <> 4 sleep 1000 Xl := ComObjCreate("Excel.Application") book:= Xl.Workbooks.add Xl.Visible := True loop % ie...
by inseption86
11 Oct 2019, 04:39
Forum: Ask For Help
Topic: Microphone - error
Replies: 0
Views: 336

Microphone - error

Hi guys, the error "Cannot find a sound recorder" crashes, run as admin not working too. IF manually - works! run, C:\Windows\system32\SoundRecorder.exe WinWait, Звукозапись ControlClick, ToolbarWindow324, ahk_class AudioRecorderMainFrameTraits return ; and this not working run, %comspec% /k C:\Wind...
by inseption86
30 Jul 2019, 08:53
Forum: Ask For Help
Topic: Сell comparison in Excel Topic is solved
Replies: 1
Views: 310

Сell comparison in Excel Topic is solved

Hello guys, tell me how to compare several lines, I can do one line (there are 10 columns), and how to make a cycle, for example, into 5 lines

Code: Select all

loop 10
{
IF xl.workSheets(1).cells(1,A_Index).value != xl.workSheets(2).cells(1,A_Index).value 
{
MsgBox, 4144, , % xl.cells(1,A_Index).value
}
}

Go to advanced search