ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Macro to clear error (https://www.excelbanter.com/excel-programming/324931-macro-clear-error.html)

gifer

Macro to clear error
 
Hi,

I have a simple macro or two, that this group has helped me write (thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data is
pointing, is out of service. If during that time, refresh is executed, I get
a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line while
the box is waiting for me to click OK. If I am not at my desk to click OK,
then my data which I am logging, is interrupted for however long I am
away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready... and pole
again, and again, on its regular interval... because, the server usually
returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a reply.
Working with Excel2000.

Thanks!

John



gifer

Macro to clear error
 
Gezz.. it happened while I was drafting this email... but now, since I am
using a macro to guide the refresh interval, rather than getting the prompt
box as usual, I get a macro Run-time error '1004' because the web query was
not on-line...

Is there an associated macro command to deal with this?

John
"gifer" wrote in message
...
Hi,

I have a simple macro or two, that this group has helped me write (thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data is
pointing, is out of service. If during that time, refresh is executed, I
get a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line
while the box is waiting for me to click OK. If I am not at my desk to
click OK, then my data which I am logging, is interrupted for however long
I am away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready... and
pole again, and again, on its regular interval... because, the server
usually returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a reply.
Working with Excel2000.

Thanks!

John




chad

Macro to clear error
 
Although I do not know what the code you are using looks like, one technique
that I use is a conditional loop that evaluates the error code produced by
the macro you are using.

A simple example is:

on error resume next 'tells excel to ignore errors

refresh commands

do while err=1004
repeat refresh commands
end

The error is the event.


"gifer" wrote:

Hi,

I have a simple macro or two, that this group has helped me write (thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data is
pointing, is out of service. If during that time, refresh is executed, I get
a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line while
the box is waiting for me to click OK. If I am not at my desk to click OK,
then my data which I am logging, is interrupted for however long I am
away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready... and pole
again, and again, on its regular interval... because, the server usually
returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a reply.
Working with Excel2000.

Thanks!

John




Tom Ogilvy

Macro to clear error
 
On Error Resume Next

possibly.

--
Regards,
Tom Ogilvy

"gifer" wrote in message
...
Gezz.. it happened while I was drafting this email... but now, since I am
using a macro to guide the refresh interval, rather than getting the

prompt
box as usual, I get a macro Run-time error '1004' because the web query

was
not on-line...

Is there an associated macro command to deal with this?

John
"gifer" wrote in message
...
Hi,

I have a simple macro or two, that this group has helped me write (thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data

is
pointing, is out of service. If during that time, refresh is executed, I
get a box telling me that "update/refresh is unable to query server"...

It
requires acknowledgment, even though the server may come back on line
while the box is waiting for me to click OK. If I am not at my desk to
click OK, then my data which I am logging, is interrupted for however

long
I am away... which could be while I am at home, off for the weekend,

etc.

How can I have the macro ignore that the server may not be ready... and
pole again, and again, on its regular interval... because, the server
usually returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a

reply.
Working with Excel2000.

Thanks!

John






gifer

Macro to clear error
 
Thanks. I tried a couple things, but compile error expecting End or End
Sub... couldn't get it to compile w/o error. My original code is below...
I'm not sure where to insert the resume on error... would it be after the
line that fails; noted below in SaveMacro. The first two sets of code are
to have the SaveMacro run every 5 seconds. Those parts work fine.

Public RunWhen As Double
Public Const cRunIntervalSeconds = 5
Public Const cRunWhat = "SaveMacro"

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedu=cRunWhat,
schedule:=True
End Sub


Sub SaveMacro()
'
' SaveMacro Macro
' Macro recorded 3/8/2005 by john
'

'
ActiveWorkbook.Save

ActiveWorkbook.RefreshAll (This is where I get the Run-Time error 1004).


End Sub



"Chad" wrote in message
...
Although I do not know what the code you are using looks like, one
technique
that I use is a conditional loop that evaluates the error code produced by
the macro you are using.

A simple example is:

on error resume next 'tells excel to ignore errors

refresh commands

do while err=1004
repeat refresh commands
end

The error is the event.


"gifer" wrote:

Hi,

I have a simple macro or two, that this group has helped me write (thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data is
pointing, is out of service. If during that time, refresh is executed, I
get
a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line
while
the box is waiting for me to click OK. If I am not at my desk to click
OK,
then my data which I am logging, is interrupted for however long I am
away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready... and
pole
again, and again, on its regular interval... because, the server usually
returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a reply.
Working with Excel2000.

Thanks!

John






Tom Ogilvy

Macro to clear error
 
Sub SaveMacro()
'
' SaveMacro Macro
' Macro recorded 3/8/2005 by john
'

'

ActiveWorkbook.Save
On Error Resume Next
ActiveWorkbook.RefreshAll ' (This is where I get the Run-Time error
1004).


End Sub

--
Regards,
Tom Ogilvy


"gifer" wrote in message
...
Thanks. I tried a couple things, but compile error expecting End or End
Sub... couldn't get it to compile w/o error. My original code is below...
I'm not sure where to insert the resume on error... would it be after the
line that fails; noted below in SaveMacro. The first two sets of code are
to have the SaveMacro run every 5 seconds. Those parts work fine.

Public RunWhen As Double
Public Const cRunIntervalSeconds = 5
Public Const cRunWhat = "SaveMacro"

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedu=cRunWhat,
schedule:=True
End Sub


Sub SaveMacro()
'
' SaveMacro Macro
' Macro recorded 3/8/2005 by john
'

'
ActiveWorkbook.Save

ActiveWorkbook.RefreshAll (This is where I get the Run-Time error

1004).


End Sub



"Chad" wrote in message
...
Although I do not know what the code you are using looks like, one
technique
that I use is a conditional loop that evaluates the error code produced

by
the macro you are using.

A simple example is:

on error resume next 'tells excel to ignore errors

refresh commands

do while err=1004
repeat refresh commands
end

The error is the event.


"gifer" wrote:

Hi,

I have a simple macro or two, that this group has helped me write

(thank
you), that tells my worksheet to RefreshAll, so outside data is updated
every 30 seconds. Occasionally, the server where the Get External Data

is
pointing, is out of service. If during that time, refresh is executed,

I
get
a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line
while
the box is waiting for me to click OK. If I am not at my desk to click
OK,
then my data which I am logging, is interrupted for however long I am
away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready... and
pole
again, and again, on its regular interval... because, the server

usually
returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a

reply.
Working with Excel2000.

Thanks!

John








gifer

Macro to clear error
 
Thanks... I just tried something before I checked for new replies... same
thing you did! Yeah.

John
"Tom Ogilvy" wrote in message
...
Sub SaveMacro()
'
' SaveMacro Macro
' Macro recorded 3/8/2005 by john
'

'

ActiveWorkbook.Save
On Error Resume Next
ActiveWorkbook.RefreshAll ' (This is where I get the Run-Time error
1004).


End Sub

--
Regards,
Tom Ogilvy


"gifer" wrote in message
...
Thanks. I tried a couple things, but compile error expecting End or End
Sub... couldn't get it to compile w/o error. My original code is below...
I'm not sure where to insert the resume on error... would it be after the
line that fails; noted below in SaveMacro. The first two sets of code
are
to have the SaveMacro run every 5 seconds. Those parts work fine.

Public RunWhen As Double
Public Const cRunIntervalSeconds = 5
Public Const cRunWhat = "SaveMacro"

Sub StartTimer()
RunWhen = Now + TimeSerial(0, 0, cRunIntervalSeconds)
Application.OnTime earliesttime:=RunWhen, procedu=cRunWhat,
schedule:=True
End Sub


Sub SaveMacro()
'
' SaveMacro Macro
' Macro recorded 3/8/2005 by john
'

'
ActiveWorkbook.Save

ActiveWorkbook.RefreshAll (This is where I get the Run-Time error

1004).


End Sub



"Chad" wrote in message
...
Although I do not know what the code you are using looks like, one
technique
that I use is a conditional loop that evaluates the error code produced

by
the macro you are using.

A simple example is:

on error resume next 'tells excel to ignore errors

refresh commands

do while err=1004
repeat refresh commands
end

The error is the event.


"gifer" wrote:

Hi,

I have a simple macro or two, that this group has helped me write

(thank
you), that tells my worksheet to RefreshAll, so outside data is
updated
every 30 seconds. Occasionally, the server where the Get External Data

is
pointing, is out of service. If during that time, refresh is executed,

I
get
a box telling me that "update/refresh is unable to query server"... It
requires acknowledgment, even though the server may come back on line
while
the box is waiting for me to click OK. If I am not at my desk to click
OK,
then my data which I am logging, is interrupted for however long I am
away... which could be while I am at home, off for the weekend, etc.

How can I have the macro ignore that the server may not be ready...
and
pole
again, and again, on its regular interval... because, the server

usually
returns to service less than a 5 minutes?

I'm guessing some kind of event... I'll try while I'm waiting on a

reply.
Working with Excel2000.

Thanks!

John











All times are GMT +1. The time now is 06:12 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com