How to Delete Rows Under Certain Row or Selected Active Cell in Excel

Normally there are some redundant rows in worksheet and we have to remove them manually, and if there is a simple way to delete them by one step will be much better. If you want to delete rows under certain row or selected active cell, you will not miss this article. This article aims at helping you to delete rows under the certain row or cell by VBA code.

See the table below. In the inventory list, some PCs are broken and should be removed from the list. Refer to the table, the rows under the sixth row (including the sixth row) should be removed. So, let’s remove them by VBA code, details please see below steps.

Delete Rows Under Certain Row 1

Method 1: Delete Rows Under Certain Row in Excel


Step 1: On current visible worksheet, right click on sheet name tab to load Sheet management menu. Select View Code, Microsoft Visual Basic for Applications window pops up.

Or you can enter Microsoft Visual Basic for Applications window via Developer->Visual Basic.

Step 2: In Microsoft Visual Basic for Applications window, click Insert->Module, enter below code in Module1:

Sub DeleteRowsUnderCertainRow()

    Worksheets("Sheet1").Rows(6 & ":" & Worksheets("Sheet1").Rows.Count).Delete

End Sub

Notes:

  1. In above script, make sure you entered correct sheet name (in this case “Sheet1”).
  2. In Rows(6 & “:” & Worksheets(“Sheet1”).Rows.Count), 6 is row number you want to delete from.

Step 3: Save the codes, see screenshot below. And then quit Microsoft Visual Basic for Applications.

Delete Rows Under Certain Row 2

Step 4: Click Developer->Macros to run Macro. Select ‘DeleteRowsUnderCertainRow’ and click Run.

Delete Rows Under Certain Row 3

Step 5: Verify that rows under the fifth row are removed properly.

Delete Rows Under Certain Row 4

Method 2: Delete Rows Under Active Cell in Excel


See below table. If we want to remove the second and third rows in the table, we can use above method. Actually, there is another way to remove them conveniently. See steps below.

Delete Rows Under Certain Row 5

Step 1: Repeat above step #1 and #2, in Module enter below code:

Sub DeleteRowsUnderActiveCell()

    Rows(ActiveCell.Row & ":" & Rows.Count).Delete

End Sub

Step 2: Save the codes, see screenshot below. And then quit Microsoft Visual Basic for Applications.

Delete Rows Under Certain Row 6

Step 3: Select an active cell in the second row. For example, B2. (You can select A2 or C2 as well)

Delete Rows Under Certain Row 7

Step 4: Click Developer->Macros to run Macro. Select ‘DeleteRowsUnderActiveCell’ and click Run.

Delete Rows Under Certain Row 8

Step 5: Verify that the second row and the third row are removed from table properly.

Delete Rows Under Certain Row 9

 

Related Posts

Find and Replace Multiple Values

This post will guide you how to find and replace multiple values at once with VBA macro or using formula  in Excel. How do I make multiple find and replace in Excel. Suppose that you have a few cells containing ...

VBA Macro For VLOOKUP From Another Sheet

In the previous post, you should know that how to fix or remove the #N/A error when using VLOOKUP formula to lookup value from another sheet. And this post will show you how to use VBA code to vlookup data ...

How To Insert Comments in Protected Worksheet in Excel

This post will show you how to allow comments in a protected worksheet in Excel. You can easily to insert comments into cells in a normal worksheet in Excel, but if want to insert a comment in a worksheet that ...

How To Convert Text to Upper Cases(Using VBA) in Excel

This post will show you how to switch from lower case to upper case in Excel. and I am going to show you two different ways of converting text to upper cases using formula or VBA macro in Excel 2013,Excel ...

How To Hide Every Other Row in Excel (Using VBA)

This post will show you how to hide alternate rows or columns in Excel or how to hide every third, fourth, fifth row or column in Excel. If you want to hide every other row in your current worksheet, how ...

Sidebar