To delete multiple rows by Excel VBA command button

Question

I have a excel sheet with command button to select and delete one row. Deletion can be done only for Rows after 12th row. below is the code I have:-

Sub Button_delete_row()
If ActiveCell.Row > 12 Then
ActiveSheet.Unprotect "xxxx"
Rows(ActiveCell.Row).Delete
ActiveSheet.Protect "xxxx", True, True
End If
End Sub

With my above code in command button, I can select only one row by highlighting with mouse click and deleting. My problem is I want to select multiple rows by highlighting with mouse drag and click on command button to delete these rows.

Darren Bartrup-Cook · Accepted Answer · 2017-05-03 15:35:50Z

2

Perhaps use the following?

Selection.EntireRow.Delete

You can select multiple cells, click the button, and the associated row will be deleted.

edited May 3, 2017 at 15:35

Darren Bartrup-Cook

20.2k2 gold badges27 silver badges50 bronze badges

answered May 3, 2017 at 15:29

smm

1009 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

To delete multiple rows by Excel VBA command button

1 Answer 1

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Related