Search results for query: *

floggin a dead horse... macro goes into first screen and that's all, nothing happens (first bank name only) I think you won't help me that way, that is, writing totally new code You do not have the system to check the code, I do, but I do not understand your code to amend it in any way The...

I don't understand your suggestions. But I know for sure it does not work. We wrote a lot but really litlle was done. Nevermind. Thanks for trying anyway

What are you referring to? For the problem no. 1 I myself have no idea what to do. I have no idea of function "WaitForCursor" What is the idea behind that? Regards

The thing is that I do not fully understand your code. For your code there are still 5 problems My old code is not perfect, but almost does the necesarry job with the exception that it always copies to the specific cells. The problem comes when I have to run the process again with different...

Hello, Maybe try with this one Sub RapidBalances() Dim Sys As Object, Sess As Object, Screen As Object Dim i As Integer Set Sys = CreateObject("EXTRA.System") If sys Is Nothing Then MsgBox ("Could not create Extra.System...is it installed on this machine?") Exit Sub End...

yes, at once In the meantime I checked with my code and it has resolved one issue of the two I had. Now it is only one issue to resolve. The problem is that all data is copied to specific cell not taking into account the fact that it can already be non-empty. My question is if it is possible...

yes, when bank is empty there is system error and it stops, font gets red... then there is message below "NO INFORMATION FOUND ***" but this you already know

when I executed step by step Do Until Sess.Screen.WaitForCursor(1, 1) Or Sess.Screen.GetString(23, 16, 14) = "NO INFORMATION" DoEvents Loop I do not see the cursor, if it cannot enter summary screen; letters S, bank name, and date get red and the initial screen stands...

The first bank that has no summary screen is from sheet 80012 Answer for second question is yes Then enter is sent For the last question I am not sure as Icannot tell it really rests in 1, 1 I cannot see it rest anywhere. No cursor is visible then

when it gets to sheet which there is no information in below line, then it waits that time for 30 seconds why? do not know why 30sec not 10sec I could ask or why not an hour? when it runs nothing specific happens on the screen this is the culprit Do Until Sess.Screen.WaitForCursor(1, 1) Or...

I can confirm, there is no waiting time at all, let alone precisely 30 sec. Odd it is

good job the issues are still there 1. Loop goes sheet by sheet, however, when it finds a bank that cannot open summary screen it waits as long as precisely 30 seconds, that gives a lot of time 2. the time to copy figures from the screen I think is too short as macro did not copy those banks...

The cursor resides in 1, 1 position

Do not know where I can get that info Apologies for me being so green in here

when the initial screen is displaye the first place for the cursor to be is 5, 20 Rest coordinates are below the screen, in the right corner ( this part of screen is not copiable)

hello, so... if there is no data in summary screen there is a short info displayed at the bottom of screen then I ask the loop to go out and start again with the next sheet (bank) If Sess.Screen.GetString(23, 16, 14) = "NO INFORMATION" Then Exit Do Yes the message is on the same, initial...

I included the copy within pre tags but it is anyway no right I think

COP041D S T A T E M E N T S S U M M A R Y 03/02/15 CURRENCY : CORRESPONDENT : CRGWP STATEMENT DATE : 30/01/15...

many thanks I will try it out tomorrow once in office, of course I will get you posted

So what is the code?