Ekselis
« previous entry | next entry »
Dec. 15., 2006 | 12:09 pm
posted by: jealousy in pajautaa
Ir idejas kā "izretināt" kolonnu? Vajag salikt atstarpes milzonīgā kolonnā. Ar roku bakstīt nepavisam nav nopietni...
from: shelter
date: Dec. 15., 2006 - 12:26 pm
#
Sub InsertRowsAndFormula()
Dim i As Double
Dim LastRow As Double
LastRow = Cells(65536, 1).End(xlUp).Row
For i = LastRow To 2 Step -1
Rows(i).Insert Shift:=xlDown
Cells(i, 1).FormulaR1C1 = ""
Next i
End Sub
Atbildēt | Diskusija
from: jealousy
date: Dec. 15., 2006 - 12:31 pm
#
Atbildēt | Iepriekšējais