Tip: Other languages are Google-Translated. You can visit the English version of this link.
Log in
x
or
x
x
Register
x

or

How to use macro to insert row below table in Excel?

It is common for us to add blank rows at the bottom of a specified table in order to expand the table and add new content. This article is talking about using a macro to insert a new row below a specified table and keep the formula of the above cell in Excel.

Use macro to insert row below table in Excel

Enable you to do smarter, faster and better

Kutools - the best office productivity tool brings 300 advanced features to Excel. Details... Download...

Office Tab - brings tabbed interface to Excel and Word, make your work much easier. Details...Download...


Use macro to insert row below table in Excel


Please do as follows to insert a blank row below a specified table with macro.

1. Press the Alt + F11 keys simultaneously to open the Microsoft Visual Basic for Applications window.

2. In the Microsoft Visual Basic for Applications window, please click Insert > Module to open the Module window. Then copy and paste the below VBA code into the window.

VBA code: use macro to insert a blank row below a specified table

Sub AddRows()
'Updated by Extendoffice 2017/9/12
    Dim xLastRow As Long
    Dim xRg As Range
    Dim xAddress As String
    On Error Resume Next
    xAddress = ActiveWindow.RangeSelection.Address
    Set xRg = Application.InputBox("Please select the table range you will insert blank row below:", "KuTools For Excel", xAddress, , , , , 8)
    If xRg Is Nothing Then Exit Sub
    xLastRow = xRg.Row + xRg.Rows.Count
    xRg.Rows(xLastRow).FillDown
    xRg.Rows(xLastRow).SpecialCells(xlCellTypeConstants).ClearContents
End Sub

3. Press the F5 key to run the code. And a Kutools for Excel dialog box pops up, please select the certain table range you will add a blank row below, and then click the OK button. See screenshot:

Then you can see a new blank row is added at the bottom of the specified table. And formula in above cell is also reserved in the newly inserted row as below see screenshot shown:



Excel Productivity Tools

Kutools for Excel - The Best Office Productivity Tool

  • Brings 300 powerful advanced features to Excel, enable you to do smarter, faster and better.
  • No longer need memorizing formulas and VBA codes, give your brain a rest from now on.
  • Become an Excel expert in 3 minutes, Complicated and repeated operations can be done in seconds, 
  • Reduce thousands of keyboard & mouse operations every day, say goodbye to occupational diseases now.
  • 110,000 highly effective people and 300+ world-renowned companies' choice.
  • 60-day full features free trial. 60-day money back guarantees. 2 years of free upgrade and support.

Office Tab - brings tabbed interface to Office, make your work much easier.

  • Enable tabbed editing and reading in Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
  • Open and create multiple documents in new tabs of the same window, rather than in new windows.
  • Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.