Status: Solved
Priority: Medium
Security: Public
Views: 1215
Last Modified: 2012-12-29

Excel .end(xlUp) fails

The sub writes messages in Outlook to an Excel file. I need the script to select to lastRow in the excel file but the line "rInt = xlWks.Range("A65536").End(xlUp).Row" errors.
ol-xl-error.txt

spitcha

Asked: 2012-12-28

Advertise Here

1 Solution

LVL 39

nutschCommented: 2012-12-28

dim rInt as a long instead, you probably have more than the 32 some thousands supported by the integer data type.

spitchaAuthor Commented: 2012-12-28

Thanks for the reply. I get the same error after changing rInt to long

LVL 22

FlysterCommented: 2012-12-28

See if this will work:

rInt = .Cells(.Rows.Count, "A").End(xlUp).Row

Flyster

spitchaAuthor Commented: 2012-12-28

Nope. Still getting the same error.

spitchaAuthor Commented: 2012-12-28

The issue is with end(xlUp). I'm able to select or get any value, leaving this query out.

LVL 37

NorieVBA ExpertCommented: 2012-12-28

xlUp is an Excel constant, you either need to use it's value, -4162, or add a declaration for it.

Const xlUp = -4162

Open in new window

spitchaAuthor Commented: 2012-12-28

Adding this line fixed the issue.
Thanks much!

Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Expand your skills with this month's free Premium course.

Excel .end(xlUp) fails

Join & Write a Comment Already a member? Login.

Featured Post