Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Sub linin()
n = Cells(Rows.Count, "C").End(xlUp).Row For i = n To 2 Step -1 If Cells(i, 3).Value < Cells(i - 1, 3).Value Then Cells(i, 3).EntireRow.Insert End If Next End Sub -- Gary''s Student - gsnu200721 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Auto insert of blank lines | Excel Discussion (Misc queries) | |||
macro to insert blank line when lines sum to zero | Excel Discussion (Misc queries) | |||
Macro not recognizing blank lines as blank | Excel Discussion (Misc queries) | |||
Macro to insert blank lines | Excel Discussion (Misc queries) | |||
how to automatically insert blank lines in between non-blank lines | Excel Programming |