![]() |
|
#3
|
|||
|
|||
|
Sub SelectLastName()
Dim ListRange As Range Set ListRange = Range("A1:A7") Range("B1") = ListRange.End(xlDown).Value ListRange.End(xlUp).Select End Sub |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| Data validation,force cell to be filed with number if respective cell is not empty | nicholes | Excel Programming | 0 | 08-01-2015 09:08 AM |
If id cell range is empty then should not allow to fill any other cell
|
ubns | Excel Programming | 2 | 04-12-2015 06:31 AM |
Delete empty cell and shift up
|
Linh | Word Tables | 1 | 09-21-2014 01:52 PM |
| Auto add a list cell if the last list cell is filled | tasuooooo | Excel | 1 | 07-31-2012 08:40 PM |