Stupid End(xlup) problem

[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!

 

[Don Guillett]

& cells(Rows.Count,"b")).End(xlUp).Row)

 

[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

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" &

 

[Steph]

Thanks guys!!!

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" &

 

[Don Guillett]

I am glad to help and glad to agree with Chip.