Search found 12 matches

by Haan
23 Aug 2022, 10:46
Forum: Scripts and Functions (v1)
Topic: Excel COM Function Library
Replies: 14
Views: 8393

Re: Excel COM Function Library

Nice work. I will test the code later. Thank you!
by Haan
08 Aug 2021, 17:59
Forum: Ask for Help (v1)
Topic: Issues working with two Excel files
Replies: 9
Views: 2505

Re: Issues working with two Excel files

You are letting Excel default to Workbooks and Sheets but you can specify what Workbook and Sheet you want to use like this: ItemTDV := oExcel.Workbooks("Book1").ActiveSheet.Cells(Row, 1).text ; Workbook named "Book1", Active Sheet ItemTDV := oExcel.Workbooks(2).Sheets(3).Cells(Row, 1).text ; Secon...
by Haan
01 Mar 2021, 11:28
Forum: Ask for Help (v1)
Topic: Excel. I don't get copy A1, then A2, A3, A4....A800 Topic is solved
Replies: 2
Views: 303

Re: Excel. I don't get copy A1, then A2, A3, A4....A800 Topic is solved

wb := ComObjGet(A_Desktop "\PlanilhaSuporte.xlsx"), n := 0 F1:: Clipboard = Clipboard := wb.Sheets("Plan1").Cells(++n, 1).Value ClipWait, 0 If ErrorLevel MsgBox, 64, Done, Done! Else MsgBox, %Clipboard% Return Man.... You are a freaking genius!!! My delay at to answer was because I found some probl...
by Haan
01 Mar 2021, 10:18
Forum: Ask for Help (v1)
Topic: Excel. I don't get copy A1, then A2, A3, A4....A800 Topic is solved
Replies: 2
Views: 303

Excel. I don't get copy A1, then A2, A3, A4....A800 Topic is solved

I need help, please. Problem: I wanna copy A1 in excel, then, to paste in another program. This i can do. But, I need, when i press F1 again, the script copy A2, thesn paste in this another progam that I mencioned. After, to copy A3, A4, ...A800, for example thats the code: f1:: Plan1 := ComObjGet("...
by Haan
01 Dec 2020, 21:38
Forum: Ask for Help (v1)
Topic: Paste data to Excel Topic is solved
Replies: 2
Views: 541

Re: Paste data to Excel Topic is solved

The last non-empty row in a column can be established using this: xl := ComObjActive("Excel.application") lstrw := xl.Range("A" xl.Rows.Count).End(-4162).Row to the first empty row is lstrw + 1 AMAZING !!!!!!! :wtf: Here is the Complete code to help whoever needs too. #SingleInstance force #Persist...
by Haan
01 Dec 2020, 18:22
Forum: Ask for Help (v1)
Topic: Paste data to Excel Topic is solved
Replies: 2
Views: 541

Paste data to Excel Topic is solved

Please, I need help with this situation: I wanna Paste data in Excel's cells. One cell each time I hit the HotKey. [:: WinActivate QWS3270 EXTRA CoordMode, Mouse, Window Send {Click 519, 195, down}{click 376, 191, up} Sleep 100 Send ^C Sleep 100 Var1 := clipboard Plan1 := ComObjGet("C:\Users\" . A_U...
by Haan
29 Nov 2020, 18:41
Forum: Ask for Help (v1)
Topic: %A_UserName% Is Killing Me! I Need Help. Topic is solved
Replies: 2
Views: 370

Re: %A_UserName% Is Killing Me! I Need Help. Topic is solved

Functions use expression syntax. Excel.Workbooks.Open("C:\Users\" . A_UserName . "\Desktop\File3.xlsx") Excel.ActiveWorkbook.SaveAs("C:\Users\" . A_UserName . "\Desktop\File3.xlsx") Worked beautifuly :dance: :bravo: Thank You Xtra. :clap: :bravo: :wave: You give me back my peace of mind. I was very...
by Haan
29 Nov 2020, 18:23
Forum: Ask for Help (v1)
Topic: %A_UserName% Is Killing Me! I Need Help. Topic is solved
Replies: 2
Views: 370

%A_UserName% Is Killing Me! I Need Help. Topic is solved

Hi everyone. Please, I need help. This my code: #SingleInstance force ;{ #Persistent #WinActivateForce #NoEnv ;} IfExist C:\Users\%A_UserName%\Desktop\File3.xlsx { Excel := ComObjCreate("Excel.Application") Excel := ComObjActive("Excel.Application") Excel.Workbooks.Open("C:\Users\%A_UserName%\Deskto...
by Haan
29 Nov 2020, 16:42
Forum: Tutoriais
Topic: Automação do Excel (COM)
Replies: 2
Views: 14517

Re: Automação do Excel (COM)

Excelente tutorial! Bem didático mesmo, me ajudou com meu script! :bravo:
by Haan
15 Nov 2020, 07:57
Forum: Ask for Help (v1)
Topic: Increase/decrease number in selected text Topic is solved
Replies: 4
Views: 488

Re: Increase/decrease number in selected text Topic is solved

When I copy number at this range: 00001/2020. The script pastes : 2/2020 Another example, when I copy 01000/2020, it pastes: 1001/2020. I need keep the format: 00002/2020 and 01002/2020. Keeping zeros. Any idea? I am greatful for your answer!!! Hi: Format will do the trick, as follows Clipboard := ...
by Haan
15 Nov 2020, 06:21
Forum: Ask for Help (v1)
Topic: Increase/decrease number in selected text Topic is solved
Replies: 4
Views: 488

Re: Increase/decrease number in selected text Topic is solved

hope it helps Clipboard := "21001/2020" RegExMatch(Clipboard, "(\d+)/(\d+)", number) Clipboard := number1+1 "/" number2 MsgBox % Clipboard Thank You AlphaBravo!!! But I stiil have a problem. Look at this, please: #SingleInstance force \:: RegExMatch(Clipboard, "(\d+)/(\d+)", number) Clipboard := nu...
by Haan
14 Nov 2020, 19:58
Forum: Ask for Help (v1)
Topic: Increase/decrease number in selected text Topic is solved
Replies: 4
Views: 488

Increase/decrease number in selected text Topic is solved

Hi, I still don't understand how to use RegEx in AutoHotkey, and need help, please. I wanna copy numbers like this: 21001/2020 (xxxx/year) and past this: 21002/2020 and when I copy 21002/2020 i want to paste: 21003/2020 So, I need always "plus one" to the sequence (21001+1; 21002+1, etc), keeping th...

Go to advanced search