How to insert a row in a column to match data in another column

[Super_Dave]

I have a column of road names with no rows in between and another column with same data with rows between the data. How do i get them to match up with r click insert?

 

[kevin9999]

Could you provide a small sample of your data using the XL2BB add in? A before and after would be ideal.

 

[Super_Dave]

Could you provide a small sample of your data using the XL2BB add in? A before and after would be ideal.

Could not get the XL2BB to work.

Hill Drive	Hill Drive	HILL DR
Hill Side Drive	Hill Side Drive	HILL SIDE DR
Hillcrest Road	Hillcrest Road	HILLCREST RD
Hillside Drive (Formerly: Lamar Taylor Road)	Hillside Drive	HILLSIDE DR
Hilltop Drive	Hilltop Drive	HILLTOP DR
Hillwood Lane
Hilton Road	Hillwood Lane	HILLWOOD LN
Hinds Road
Hinton Road	Hilton Road	HILTON RD
Hodge Road
Hodges McCullum Road	Hinds Road	HINES RD

 

[kevin9999]

So is the first column in your image column A? And is that the column you want to change to look like/align with (presumably) column B?

 

[Super_Dave]

So is the first column in your image column A? And is that the column you want to change to look like/align with (presumably) column B?

Yes sir.

 

[kevin9999]

In your original post you said they contained the same data

another column with same data

but I notice that Hillside Drive is different in both columns? If the values in column B take precedence then you could simply copy column B & paste over column A. If that's not what you want, then you're looking at a VBA solution.

 

[Super_Dave]

In your original post you said they contained the same data

but I notice that Hillside Drive is different in both columns? If the values in column B take precedence then you could simply copy column B & paste over column A. If that's not what you want, then you're looking at a VBA solution.

Column A is the new updated data and column B is the old data. I am trying to insert rows for column A data will directly next to Column B data.

 

[kevin9999]

OK, please try the following code in a standard module on a copy of your workbook. Only run it once!

Sub Add_Blanks()
    Dim c As Range
    For Each c In Range("B2", Cells(Rows.Count, "B").End(xlUp))
        If c = "" Then c.Offset(, -1).Insert xlShiftDown
    Next c
End Sub

 

[Super_Dave]

OK, please try the following code in a standard module on a copy of your workbook. Only run it once!

Sub Add_Blanks()
    Dim c As Range
    For Each c In Range("B2", Cells(Rows.Count, "B").End(xlUp))
        If c = "" Then c.Offset(, -1).Insert xlShiftDown
    Next c
End Sub

Did not work

 

[kevin9999]

OK, I can't guess how your sheet actually is actually structured, and given that you can't get the XL2BB to work, could you share your workbook via Google Drive, Dropbox or similar file sharing platform?