• Hi All

    Please note that at the Chandoo.org Forums there is Zero Tolerance to Spam

    Post Spam and you Will Be Deleted as a User

    Hui...

  • When starting a new post, to receive a quicker and more targeted answer, Please include a sample file in the initial post.

Rows insertion in excel sheet using vba

A

Aram

New Member
How to write a code for inserting a blank row above every non-empty cell in Column B working from the bottom up
 
Simple loop...
Code: 
Sub test()
    Dim i&
    For i = Range("b" & Rows.Count).End(xlUp).Row To 2 Step -1
        If Cells(i, "b") <> "" Then Rows(i).Insert
    Next
End Sub
 
You must log in or register to reply here.
Back
Top