![]() |
![]() |
|
|||||||
| Excel Questions All Excel/VBA questions - formulas, macros, pivot tables, general help, etc. Please post to this forum in English only. |
![]() |
|
|
Thread Tools | Display Modes |
|
|
#1 |
|
Board Regular
Join Date: Feb 2002
Posts: 422
|
After selecting a cell in column A how do I delete all rows from this cell to the end of a work book
ie If I select cell A100 I want to delete rows 100 to 65536 |
|
|
|
|
|
#2 |
|
Board Regular
Join Date: Apr 2002
Location: Midlands, UK
Posts: 217
|
VBA code would be
Sub delete_rows() Range(ActiveCell, Cells(65536,ActiveCell.Column)).EntireRow.Delete End Sub |
|
|
|
|
|
#3 |
|
Board Regular
Join Date: Feb 2002
Posts: 422
|
Thank You
It was what I was looking for |
|
|
|
![]() |
| Bookmarks |
| Thread Tools | |
| Display Modes | |
|
|