Thread: [Solved] Get next non empty cell from a specific list with VBA
View Single Post
 
Old 06-15-2016, 08:40 AM
KunleExcel KunleExcel is offline Windows 8 Office 2010 32bit
Novice
  
Join Date: Jun 2016
Location: Nigeria
Posts: 17
KunleExcel is on a distinguished road
Default
Sub SelectLastName()

Dim ListRange As Range

Set ListRange = Range("A1:A7")

Range("B1") = ListRange.End(xlDown).Value

ListRange.End(xlUp).Select
End Sub
Reply With Quote