Excel - macro to lookup cell and add new row


I want to create a macro which will look at for example column A and find the last number entered then add a row below it and to do this every time its ran.


You can use this macro :

Sub Insert_Row() 
Dim n As Integer 
n = Cells(Rows.Count, 1).End(xlUp).Row  
    Selection.Insert Shift:=xlUp 
End Sub


Thanks to aquarelle for this tip on the forum.

Ask a question
CCM is a leading international tech website. Our content is written in collaboration with IT experts, under the direction of Jean-François Pillou, founder of CCM.net. CCM reaches more than 50 million unique visitors per month and is available in 11 languages.
This document, titled « Excel - macro to lookup cell and add new row », is available under the Creative Commons license. Any copy, reuse, or modification of the content should be sufficiently credited to CCM (ccm.net).