PDA

View Full Version : Insert new Row



KK1966
01-11-2010, 11:09 PM
Hi
Any one can help me the VB code to rows count by column B when if column A cells value = mascross” than insert a rows on above the cells “mascross”.

Your help I highly appreciate
Thanks very much

Bob Phillips
01-12-2010, 01:43 AM
With Activesheet

LastRow = .Cells(.Rows.Count, "A").End(xlUp).Row
For i = LastRow - 1To 1 Step -1

If .Cells(i, "B").Value2 = "mascross" Then

.Rows(i + 1).Insert
End If
Next i
End With