ERROR HANDLING

[SQUIDD]

Hi All

I seem to have allot of trouble with error handling.

Could someone please help/explain

lets say i have a loop that returns an error with that loop, but if you keep waiting it isnt an error any more.

something like the below.

But the below example will only go to the errh: once, why does it not continue to loop?

retry:

for a = 1 to 10
on error goto errh
  'get info sometimes throws an error but if you wait a second or 2 it will eventually be ok
next a

errh:
application.wait(now + timevalue("00:00:02"))
goto retry

Thanks dave

 

[dmt32]

Hi,
try this update to your code & see if does what you want

Sub Squidd()

    On Error GoTo errh
    For a = 1 To 10
    
      'get info sometimes throws an error but if you wait a second or 2 it will eventually be ok
    
retry:
    Next a
    
errh:
    If Err <> 0 Then
        Application.Wait (Now + TimeValue("00:00:02"))
        Resume retry
    End If

End Sub

Dave

 

[SQUIDD]

Hi Dave.

That’s great. And I understand how it works.

I haven’t yet tried it in my actual code. But just run a little test and was able to see it getting the error every time.

Very many Thanks. It was driving me crazy.

Dave.

 

[Oaktree]

Dave answered your direct question; but, as an aside, if you're having to wait because you're waiting for a query to refresh, you might also consider using Application.CalculateUntilAsyncQueriesDone. That might eliminate the need for the loop/error checking entirely.

 

[dmt32]

welcome glad update helps

May find it worthwhile having a read of this article: VBA Error Handling - A Complete Guide - Excel Macro Mastery

Dave

 

[SQUIDD]

Thanks oaktree

Appreciate the suggestion.

The error is as a result data not being available on a webpage.

Although I am waiting for the element to be available. Sometimes it just throws an error randomly. Like 1-2 in 1000 in the loop. But obviously 1 error is enough to bring the code to a stop. Lol.