Go To Last Cell +1 Macro

[Dennis]

I would like to have a macro that selects the first blank cell after the last
entry in a column. (But don't include a formatted cell as an entry, just
text,numbers,etc). The column is B. I've fumbled for 2 days on this one.

TIA,
Dennis
*********************

 

[J.E. McGimpsey]

One way:

Public Sub GoToEndOfColumnB()
Range("B" & Rows.Count).End(xlUp).Offset(1, 0).Select
End Sub

 

[J.E. McGimpsey]

Don't assume that my way is the only way - there are innumerable
ways to accomplish the same thing, some more efficient than others...

 

[Earl Kiosterud]

Dennis,

Here's another. It stops at the first blank cell, even if there's stuff
after it. A little different than J.E.'s, which selects the cell after the
last non-empty cell of the column. Fun, huh?

Range("B2").End(xlDown).Offset(1, 0).Select

Earl Kiosterud
Mvpearl omitthisword ar verizon period net.