ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Delete rows (https://www.excelbanter.com/excel-programming/389209-delete-rows.html)

Tendresse

Delete rows
 
I'm writing a macro to allow users to delete rows from the sheet. All they
have to do is select a cell in the table and press a shortcut. The entire row
where this cell is located will then be deleted. However, i want to prevent
them from deleting any rows below the last row in the table.
Because the table changes all the time (eg new rows get added), the row
number for the last row is a variable. to go around this, i gave the first
cell in the last row a name "Bottom". So how can i check that the cell
selected by the user (in the row they want to delete) is not situated below
"Bottom"?

The last row in my table has a different pattern and colour (to give a
visual indication that the table ends there).

Many thanks in advance

Dave Mac

Delete rows
 
On 11 May, 07:49, Tendresse
wrote:
I'm writing a macro to allow users to delete rows from the sheet. All they
have to do is select a cell in the table and press a shortcut. The entire row
where this cell is located will then be deleted. However, i want to prevent
them from deleting any rows below the last row in the table.
Because the table changes all the time (eg new rows get added), the row
number for the last row is a variable. to go around this, i gave the first
cell in the last row a name "Bottom". So how can i check that the cell
selected by the user (in the row they want to delete) is not situated below
"Bottom"?

The last row in my table has a different pattern and colour (to give a
visual indication that the table ends there).

Many thanks in advance


try something like:-

if activecell.row = range("namedcell").row then
msgbox "Doh!"
exit sub
end if



All times are GMT +1. The time now is 05:42 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com