Select all cells in a column , even when blank...

NoSparks · #1 05-29-2018, 08:32 PM

determine the 'last row' separately

Code:

lr = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
Range(ActiveCell, Cells(lr, ActiveCell.Column)).Select

Chayes · #2 05-30-2018, 06:01 AM

Hi All

Ok thanks for this. It's solved the issue and is working perfectly now.

Very Best Wishes ,

Thread Tools
Show Printable Version Email this Page
Display Modes
Switch to Linear Mode Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Vlookup fill down blank cells in column	mbesspiata	Excel Programming	8	09-26-2016 04:44 AM
Auto Fill only Blank Cells in a Column	mbesspiata3	Excel Programming	1	09-22-2016 07:18 PM
Return Sum value of one column from cells not blank in another column	zulugandalf	Excel	3	08-14-2014 03:37 AM