Thread: [Solved] Select all cells in a column , even when blank...
View Single Post
 
Old 05-29-2018, 08:32 PM
NoSparks NoSparks is offline Windows 7 64bit Office 2010 64bit
Excel Hobbyist
  
Join Date: Nov 2013
Location: British Columbia, Canada
Posts: 831
NoSparks is just really niceNoSparks is just really niceNoSparks is just really niceNoSparks is just really niceNoSparks is just really nice
Default
determine the 'last row' separately
Code:
lr = Cells.Find(What:="*", SearchDirection:=xlPrevious, SearchOrder:=xlByRows).Row
Range(ActiveCell, Cells(lr, ActiveCell.Column)).Select
Reply With Quote