Automatically inserting blank lines

Brenda Smith

New Member
Joined
Mar 15, 2004
Messages
11
I have a spreadsheet that has over 50,000 lines of data. Columns consists of Names and Numbers specific with the name. I could have as many as 25 lines with the same identifying name and number. I want to know if there is an actiona that will look in the column of identifying numbers and insert a blank line when a number changes.

Thanks for any help.
 

Excel Facts

Copy formula down without changing references
If you have =SUM(F2:F49) in F50; type Alt+' in F51 to copy =SUM(F2:F49) to F51, leaving the formula in edit mode. Change SUM to COUNT.
I think you will need to use a Macro to do that.
Here is one that would do what you want (assuming column "B" is your number column):
Code:
Sub MyLineInsert()

    Dim myLastRow As Long
    Dim myRow As Long
    
    Application.ScreenUpdating = False
    
'   Find last row in column B
    myLastRow = Cells(Rows.Count, "B").End(xlUp).Row
    
'   Loop through all rows, inserting a blank row whenver value in column B changes
    For myRow = myLastRow To 2 Step -1
        If Cells(myRow, "B") <> Cells(myRow - 1, "B") Then Rows(myRow).Insert
    Next myRow
    
    Application.ScreenUpdating = True
    
End Sub
 
Upvote 0

Forum statistics

Threads
1,213,497
Messages
6,113,998
Members
448,541
Latest member
iparraguirre89

We've detected that you are using an adblocker.

We have a great community of people providing Excel help here, but the hosting costs are enormous. You can help keep this site running by allowing ads on MrExcel.com.
Allow Ads at MrExcel

Which adblocker are you using?

Disable AdBlock

Follow these easy steps to disable AdBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the icon in the browser’s toolbar.
2)Click on the "Pause on this site" option.
Go back

Disable AdBlock Plus

Follow these easy steps to disable AdBlock Plus

1)Click on the icon in the browser’s toolbar.
2)Click on the toggle to disable it for "mrexcel.com".
Go back

Disable uBlock Origin

Follow these easy steps to disable uBlock Origin

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back

Disable uBlock

Follow these easy steps to disable uBlock

1)Click on the icon in the browser’s toolbar.
2)Click on the "Power" button.
3)Click on the "Refresh" button.
Go back
Back
Top