Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 172
Default Application Run Time Error 1004 and Stack Error

I posted this a few days back. Have not yet figured out
how to fix it. Effectively, the routine simply carries
out queries on a spreadsheet and prints results which are
hyperlinks to cell addresses. The list of links can be
quite extensive. In some cases the list goes down to row
65,536. Each type of query is printed in a particular
column.

During the routine, my code seems to periodically
failing. The error is a 1004 Error. However I can't
figure out why this happening. It happens in row 65,532
or 64,420 etc. However it just failed in row 1,111. This
is the line of code it fails on. It fails after the If
statement on the the Errrng line:

If RowCheck(Errrng) = False Then

Errrng.Parent.Hyperlinks.Add Anchor:=Errrng, Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr

'Increment paste range for next comment
Set Errrng = Errrng.Offset(1, 0)
End If

When going to the immediate window I get:
?RowCheck(Errrng) = FALSE
True

?Errrng.Address
$F$1111

?sStr1
'Financing'!W37

?sStr
Financing!W37

Can anyone tell me what is happening here?
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 860
Default Application Run Time Error 1004 and Stack Error

Hi ExcelMonkey,

When you go into Debug mode on an error, can you execute the Hyperlinks.Add
from the immediate window?

Errrng.Parent.Hyperlinks.Add Anchor:=Errrng, Address:="", SubAddress:=sStr1,
TextToDisplay:=sStr

Or do you get a 1004 there?

If you can do it in the immediate window, then it may be a timing issue. I
have run into this more times than I'd like - you can step through code just
fine, but when a routine is running at full speed, it intermittently errors
out. I've even had code that works perfectly on slow machines that fail on
faster machines due to timing issues. To see if that could be happening,
you can try adding a DoEvents right before the offending line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]


ExcelMonkey wrote:
I posted this a few days back. Have not yet figured out
how to fix it. Effectively, the routine simply carries
out queries on a spreadsheet and prints results which are
hyperlinks to cell addresses. The list of links can be
quite extensive. In some cases the list goes down to row
65,536. Each type of query is printed in a particular
column.

During the routine, my code seems to periodically
failing. The error is a 1004 Error. However I can't
figure out why this happening. It happens in row 65,532
or 64,420 etc. However it just failed in row 1,111. This
is the line of code it fails on. It fails after the If
statement on the the Errrng line:

If RowCheck(Errrng) = False Then

Errrng.Parent.Hyperlinks.Add Anchor:=Errrng, Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr

'Increment paste range for next comment
Set Errrng = Errrng.Offset(1, 0)
End If

When going to the immediate window I get:
?RowCheck(Errrng) = FALSE
True

?Errrng.Address
$F$1111

?sStr1
'Financing'!W37

?sStr
Financing!W37

Can anyone tell me what is happening here?


  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 172
Default Application Run Time Error 1004 and Stack Error

How do you execute within the immediate window? I tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr

and recieved a compile error expected expression. Using
F8 does not work either to step through it after it has
failed

How exactly would I use the Do Event?

Thnks



-----Original Message-----
Hi ExcelMonkey,

When you go into Debug mode on an error, can you execute

the Hyperlinks.Add
from the immediate window?

Errrng.Parent.Hyperlinks.Add Anchor:=Errrng, Address:="",

SubAddress:=sStr1,
TextToDisplay:=sStr

Or do you get a 1004 there?

If you can do it in the immediate window, then it may be

a timing issue. I
have run into this more times than I'd like - you can

step through code just
fine, but when a routine is running at full speed, it

intermittently errors
out. I've even had code that works perfectly on slow

machines that fail on
faster machines due to timing issues. To see if that

could be happening,
you can try adding a DoEvents right before the offending

line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]


ExcelMonkey wrote:
I posted this a few days back. Have not yet figured out
how to fix it. Effectively, the routine simply carries
out queries on a spreadsheet and prints results which

are
hyperlinks to cell addresses. The list of links can be
quite extensive. In some cases the list goes down to

row
65,536. Each type of query is printed in a particular
column.

During the routine, my code seems to periodically
failing. The error is a 1004 Error. However I can't
figure out why this happening. It happens in row 65,532
or 64,420 etc. However it just failed in row 1,111.

This
is the line of code it fails on. It fails after the If
statement on the the Errrng line:

If RowCheck(Errrng) = False Then

Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,

Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr

'Increment paste range for next comment
Set Errrng = Errrng.Offset(1, 0)
End If

When going to the immediate window I get:
?RowCheck(Errrng) = FALSE
True

?Errrng.Address
$F$1111

?sStr1
'Financing'!W37

?sStr
Financing!W37

Can anyone tell me what is happening here?


.

  #4   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 860
Default Application Run Time Error 1004 and Stack Error

Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?", which is a shortcut
for "Debug.Print" (you don't need a result in this case, you just want to
see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a line by itself
before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]

  #5   Report Post  
Posted to microsoft.public.excel.programming
No Name
 
Posts: n/a
Default Application Run Time Error 1004 and Stack Error

When I try to run it from the Immediate window I get a Run
Time Error 424 Object Required.


-----Original Message-----
Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I

tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?",

which is a shortcut
for "Debug.Print" (you don't need a result in this case,

you just want to
see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a

line by itself
before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]

.



  #6   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 172
Default Application Run Time Error 1004 and Stack Error

Can't seem to find DoEvent in the Help database.

Typing DoEvent by itself creats an error. Is it a Do
While or Do Until loop that you are talking about?


-----Original Message-----
Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I

tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?",

which is a shortcut
for "Debug.Print" (you don't need a result in this case,

you just want to
see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a

line by itself
before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]

.

  #7   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 172
Default Application Run Time Error 1004 and Stack Error

Sorry I found DoEvents in a book. Will try and get back
to you.


-----Original Message-----
Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I

tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?",

which is a shortcut
for "Debug.Print" (you don't need a result in this case,

you just want to
see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a

line by itself
before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]

.

  #8   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 172
Default Application Run Time Error 1004 and Stack Error

DoEvents does not work. It failed on the same line of
code. Its funny because it pastes the item but just can't
seem to turn it into a hyperlink.

The routine steps through a loop and does several searches
based on criteria I set up. I can run 1 to 6 different
types of searches. When I run the first three it
populates the results of all three in columns side by
side. It fails on the third search type. Interesting,
the second search populates all 65,536 rows. When it
fails on the third if fails in column 1,111

However if I run just the third search it works fine. Its
almost as if amount of hyperlinks associated with the
second search results affects the third one when run back
to back.

do not understand why??????????


-----Original Message-----
Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I

tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?",

which is a shortcut
for "Debug.Print" (you don't need a result in this case,

you just want to
see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a

line by itself
before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address

unmonitored]

.

  #9   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 860
Default Application Run Time Error 1004 and Stack Error

Hi,

If the worksheet doesn't contain any sensitive data, I'd be willing to take
a look if you want to email it to me directly: mvp <-at- longhead <--dot--
com.

If the workbook is large, please zip it up before sending.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]


ExcelMonkey wrote:
DoEvents does not work. It failed on the same line of
code. Its funny because it pastes the item but just can't
seem to turn it into a hyperlink.

The routine steps through a loop and does several searches
based on criteria I set up. I can run 1 to 6 different
types of searches. When I run the first three it
populates the results of all three in columns side by
side. It fails on the third search type. Interesting,
the second search populates all 65,536 rows. When it
fails on the third if fails in column 1,111

However if I run just the third search it works fine. Its
almost as if amount of hyperlinks associated with the
second search results affects the third one when run back
to back.

do not understand why??????????


-----Original Message-----
Hi,

ExcelMonkey wrote:
How do you execute within the immediate window? I tried:

? Errrng.Parent.Hyperlinks.Add Anchor:=Errrng,
Address:="", _
SubAddress:=sStr1, _
TextToDisplay:=sStr


It needs to be all on one line, and don't use the "?", which is a
shortcut for "Debug.Print" (you don't need a result in this case,
you just want to see if the statement executes without error).

How exactly would I use the Do Event?


There is a command called "DoEvents". Just put it on a line by
itself before your Hyperlinks.Add line of code.

--
Regards,

Jake Marx
MS MVP - Excel
www.longhead.com

[please keep replies in the newsgroup - email address unmonitored]

.


Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
I got this problem run-time error 1004 application defined ... Davide Blau Excel Discussion (Misc queries) 2 July 10th 06 09:27 PM
Run time error 1004, General ODBC error [email protected] New Users to Excel 0 September 19th 05 01:41 AM
Macro Run-time Error 1004 Application Defined or Object Defined Error Anddmx Excel Programming 6 June 9th 04 03:40 PM
"Run Time Error 1004 Application Defined or Object Defined Error." BJC Excel Programming 4 October 26th 03 03:09 AM


All times are GMT +1. The time now is 08:28 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"