Stupid End(xlup) problem

S

Steph

Hello. I am trying to determine the max # in a column. I have the
following code:

Range("B30").Formula = Application.WorksheetFunction.Max(Range("B4:B" &
Rows.Count).End(xlUp).Row)

But when i debug this, it says Max(Range("B4:B" & Rows.Count).End(xlUp).Row)
= 2. So it looks like it is highlighting b4:b65536, then hitting end(xlup),
which brings the activecell to B2. I just want it to use B4:the last used
cell.

I am assuming I have a paren in the worng place or something simple. Please
help? Thanks!
 
C

Chip Pearson

Steph,

Try

Range("B30").Formula = _
Application.WorksheetFunction.Max(Range("B4:B" & _
Cells(Rows.Count, "B").End(xlUp).Row))



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


Steph said:
Hello. I am trying to determine the max # in a column. I have the
following code:

Range("B30").Formula =
Click to expand...
Application.WorksheetFunction.Max(Range("B4:B" &
 
S

Steph

Thanks guys!!!

Chip Pearson said:
Steph,

Try

Range("B30").Formula = _
Application.WorksheetFunction.Max(Range("B4:B" & _
Cells(Rows.Count, "B").End(xlUp).Row))



--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com



Application.WorksheetFunction.Max(Range("B4:B" &
Click to expand...
 
Top