Microsoft Office Forums - View Single Post - Add a button to add a line

Thread: Add a button to add a line

View Single Post

Old

04-15-2019, 10:25 AM

Logit

Logit is offline

Logit uses Windows 10

Windows 10 Logit uses Office 2007

Logit uses Office 2007

Office 2007

Expert

Join Date: Jan 2017

Posts: 591

Logit is a jewel in the rough

Logit is a jewel in the rough

Logit is a jewel in the rough

Logit is a jewel in the rough

Default

.

Code:

Sub insertrows()
    ActiveCell.EntireRow.Offset(1).Resize(1).Insert Shift:=xlDown
End Sub

The above will add a blank line below the cell that is selected.

If you click on A7, then run the above macro, the new line will be added
on A8.

Reply With Quote