error 1004

P

pls123

Hi all again !!!
i got this error opening my page..

=============
run time error 1004
method 'ontime' of object '_application' failed
=============

on this line ...

.....if i dont set "error resume next"
....how can avoid it ??
This is all the macro.. tx for help !!






Option Explicit

Public nTime As Double

===================================================

Public Sub StartTimer()

Dim aWB As Workbook
Dim aWS As Worksheet
Set aWB = ThisWorkbook
Set aWS = aWB.Worksheets("Sheet1")

On Error Resume Next
Application.OnTime nTime, "RunTimer", , False '<<<<<<<<<<<<<<
'On Error GoTo 0

aWS.Range("O8").Value = 0
aWS.Range("G10").Calculate

RunTimer
End Sub
 
J

Joel

What does NTIME equal?

Public Sub StartTimer()

Dim aWB As Workbook
Dim aWS As Worksheet
Set aWB = ThisWorkbook
Set aWS = aWB.Worksheets("Sheet1")

On Error Resume Next
Application.OnTime _
EarliestTime:=nTime, _
Procedure:="RunTimer", _
Schedule:=False

'On Error GoTo 0

aWS.Range("O8").Value = 0
aWS.Range("G10").Calculate

RunTimer
End Sub
 
P

pls123

hi joel, this part of my project have been given to me , but i don't know
exactly what evrything means and do...

what should i do ?!?!?!
what should ntime be ??
does it mean the time for next processing ??

i left this sub unknow because it is called only at the opening of the page,
and with
error go next it doesn't give problems...
 
P

pls123

hi joel , SORRY AGAIN !

my question is .. may i disable that row definitely ??

tx !!
 
J

Joel

You are right. The Ontime function isn't doing anything. If the macro(s)
still work then simply eliminate the ONTime statement. I suspect the real
code is in the routine RUNTIMER. It looks like the person who wrote the code
didn't realize the OnError statment masked a problem. Not sure what
changges you made the caused the error to show up.

You have reached the frustration stage of programming in VBA. Everybody
goes through it at the beginning. The POOR documentation and bad examples
that microsoft provides gets everybody inot this state of mind.
 
P

pls123

hehe you welcome p !!!

i have developed a little theory during the night..

that row is a check that stops the ontime , while opening the page,
for the case it was not closed properly last time,
but it returns error if its all ok, and no ntime was to end...!!
 
P

pls123

PS
it was me that added the
resume next..
...because it had error..
but didnt make any other change !!!
probably that was added , intending to reset any ontime eventually not
closed proprerly (if that is possible)
tx !!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top