Search found 124 matches

by ivill
04 Apr 2022, 00:02
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

There probably is a more elegant way of doing it, but this should work: xl := ComObjCreate("Excel.Application") xl.Workbooks.Open("G:\My Drive\Untitled folder\1.xlsm") xl.Sheets("sheet1").Select B17AS21 := xl.range("B21:AS21") xl.ActiveWorkbook.Save xl.Workbooks.Open("C:\Users\iViLL\OneDrive\A\2.xl...
by ivill
03 Apr 2022, 23:57
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

Try using the copy method (https://docs.microsoft.com/en-us/office/vba/api/excel.range.copy): xl := ComObjCreate("excel.application") wrkbk1 := xl.Workbooks.Open(a_scriptdir . "\test123A.xlsx") ; source wrkbk2 := xl.Workbooks.Open(a_scriptdir . "\test123B.xlsx") ; target wrkbk1.ActiveSheet.range("A...
by ivill
03 Apr 2022, 23:47
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

Yes, my example forgot to close the first workbook. You could use @flyingDman's method or use a combination of our methods: xl := ComObjCreate("excel.application") wrkbk1 := xl.Workbooks.Open("G:\My Drive\Untitled folder\1.xlsm") wrkbk2 := xl.Workbooks.Open("C:\Users\iViLL\OneDrive\A\2.xlsx") B17AS...
by ivill
03 Apr 2022, 11:20
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

There probably is a more elegant way of doing it, but this should work: xl := ComObjCreate("Excel.Application") xl.Workbooks.Open("G:\My Drive\Untitled folder\1.xlsm") xl.Sheets("sheet1").Select B17AS21 := xl.range("B21:AS21") xl.ActiveWorkbook.Save xl.Workbooks.Open("C:\Users\iViLL\OneDrive\A\2.xl...
by ivill
03 Apr 2022, 08:54
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

It depends on what you plan to do with the cell texts. This for example would loop through the range and display cell texts one by one: B17AS21 := xl.range("B21:AS21") for cell, in B17AS21 { ToolTip, % "Cell text: " cell.Text Sleep, 500 } Hi, I want to copy cell text(not cell value) to another sheet
by ivill
03 Apr 2022, 06:01
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

Re: excel comobject problem

I think your code does not close the Excel process, so if you run it more than once then it keeps your second xls file as read-only and prevents further changes from being made. Open Task Manager with Ctrl+Alt+Del and kill all "Microsoft Excel" processes. Then try this: xl := ComObjCreate("Excel.Ap...
by ivill
03 Apr 2022, 03:35
Forum: Ask for Help (v1)
Topic: excel comobject problem
Replies: 12
Views: 1613

excel comobject problem

xl := ComObjCreate("Excel.Application") xl.Workbooks.Open("G:\My Drive\Untitled folder\1.xlsm") xl.Sheets("sheet1").Select B17AS21 := xl.range("B21:AS21").Value xl.ActiveWorkbook.Save xl.Quit xl := ComObjCreate("Excel.Application") xl.Workbooks.Open("C:\Users\iViLL\OneDrive\A\2.xlsx") xl.Visible :=...
by ivill
03 Apr 2021, 11:31
Forum: Scripts and Functions (v1)
Topic: FindText - Capture screen image into text and then find it Topic is solved
Replies: 1087
Views: 571678

Re: FindText - Capture screen image into text and then find it Topic is solved

I have 2 PCs with 2 different maximum screen resolutions. PC1 has 1920x1080 and PC2 has 1366x768. PC1 is my primary machine, which I use the most. Let's say on PC1, I take a screen capture using Findtext and the automatically generated code works fine on PC1. Is there an easy way to make this code ...
by ivill
24 Mar 2021, 03:16
Forum: Ask for Help (v1)
Topic: sum numbers from clipboard Topic is solved
Replies: 3
Views: 660

Re: sum numbers from clipboard Topic is solved

ClipBoard = ( 1000.00 2000.00 3000.00 4000.00 ) ; ^^^ this is to simulate what is on your clipboard for this test MsgBox, % fnSumNumericLines(ClipBoard) fnSumNumericLines(InputVar) { Loop, Parse, InputVar, `r`n Result += A_LoopField Result := Format("{:.2f}", Result) ; if you want it formatted Retu...
by ivill
24 Mar 2021, 03:15
Forum: Ask for Help (v1)
Topic: sum numbers from clipboard Topic is solved
Replies: 3
Views: 660

Re: sum numbers from clipboard Topic is solved

FIrst of all, thanks for your help.
by ivill
24 Mar 2021, 00:25
Forum: Ask for Help (v1)
Topic: sum numbers from clipboard Topic is solved
Replies: 3
Views: 660

sum numbers from clipboard Topic is solved

1000.00
2000.00
3000.00
4000.00

how do i supposed to sum such numbers from clipboard as shown above?
anyone help, Appreciate !
by ivill
19 Mar 2021, 03:08
Forum: Scripts and Functions (v1)
Topic: FindText - Capture screen image into text and then find it Topic is solved
Replies: 1087
Views: 571678

Re: FindText - Capture screen image into text and then find it Topic is solved

Hi, need help please, how do i manage to work with multiple monitors?
I've got a laptop and sometimes work with an external monitor, and it won't work with different monitors,
for this situation, do you have some advice to solve the problem? thanks very much!
by ivill
18 Jan 2019, 01:51
Forum: Ask for Help (v1)
Topic: Excel sum cells to an established number
Replies: 4
Views: 1495

Excel sum cells to an established number

Hi all, For example, The established number is 500000(maybe i shall create an input box), how to use COMobjExcel way to pick the right cells in column A which can get the sum result 500000? as the attachment image shown, there are two or more answers, the yellow and blue background colored cells, si...
by ivill
24 Dec 2018, 04:23
Forum: Scripts and Functions (v1)
Topic: [Class] Monitor (Brightness, Contrast, Gamma Ramp)
Replies: 75
Views: 52020

Re: Class Monitor (Brightness, ColorTemperature)

Hi, Since the latest Windows 10 preview build 18305.rs_prerelease.181213-2133 installed, the script no longer works, anyone else who have the same issue?
by ivill
11 Apr 2018, 00:07
Forum: Scripts and Functions (v1)
Topic: FindText - Capture screen image into text and then find it Topic is solved
Replies: 1087
Views: 571678

Re: FindText - Capture screen image into text and then find it Topic is solved

Hi, FeiYue, i have a question, your script works great, except the different displayer issue, can you maybe make a fuzzy match setting at the next update? here is my issue: the same image/text to find on different displayer will not work as the same, let's say i captured this on PC1: __00000________...
by ivill
05 Mar 2018, 22:34
Forum: Ask for Help (v1)
Topic: Numberic date convertion improval?
Replies: 2
Views: 935

Numberic date convertion improval?

Hi, I use the following script to convert numberic date to format year . month . date but sometimes it's not stable...not work for all possible existing format, anyway i didn't found smilar script in our forum, is there any simple and stable way to convert date like this? thanks! 20180306112449.png ...
by ivill
27 Feb 2018, 03:23
Forum: Ask for Help (v1)
Topic: LV_GetText without a ListView/GUI
Replies: 6
Views: 1797

Re: LV_GetText without a ListView/GUI

First, your Msgbox is wrong, should be: MsgBox % R[1] "`n" R[2] "`n" R[3] "`n" R[4] "`n" R[5] Second, after 107 posts you're asking how to populate a variable with another variable contents ? Strange. Anyway: blablabla := R[1] ccccccc := R[2] agfhasgsf := R[3] another1 := R[4] thelast := R[5] You k...
by ivill
27 Feb 2018, 03:01
Forum: Ask for Help (v1)
Topic: LV_GetText without a ListView/GUI
Replies: 6
Views: 1797

Re: LV_GetText without a ListView/GUI

Yes, replace with this: UDR := 1 ; Maximum Results ;... ;... ;... str:="" For I, R In Results str .= R[1] "`n" R[2] "`n" R[3] "`n" R[4] "`n" R[5] MsgBox %str% return How to call the R[1]-R[5], in order to use them later (not just the example MsgBox %str% ) str:="" For I, R In Results MsgBox, %R[1]%...
by ivill
26 Feb 2018, 19:07
Forum: Ask for Help (v1)
Topic: LV_GetText without a ListView/GUI
Replies: 6
Views: 1797

Re: LV_GetText without a ListView/GUI

Like this ? #NoEnv SetBatchLines, -1 ; Constant multipliers P1 := 7.25 P2 := 6.53 P3 := 6.16 P4 := 5.43 Amount := 30000 MinD := 10 ; Minimum Deviation MaxD := 50 ; Maximum Deviation UDR := 15 ; Maximum Results UDD := 3 ; Maximum Delta ( 1 to 5 ) UDI := 3 ; Maximum Iterations (1 to 3 ) gosub Calcula...
by ivill
26 Feb 2018, 04:05
Forum: Ask for Help (v1)
Topic: LV_GetText without a ListView/GUI
Replies: 6
Views: 1797

LV_GetText without a ListView/GUI

Hi, everyone, This script works very well for me, Thanks for @just me's help, but i just got an idea and meet a challenge, can't accomplish it by myself: How can i make the script works without a GUI, use a preset conditions and vAmount(for example 30000) to calculate then instant get the results Ms...

Go to advanced search