Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() Hi, i have a list of values like this: 54 24 31 ... I want to place number 54 and then leave 4 blank spaces, the plac number 24, and 4 blanks, and so on, so it would look like this 54 24 31 ... How can i do this automatically?, the list is too long to insert cells and then press f4 for each value, is there an autofill that ca skip rows , or something that can help me?? Thanks a lot for the hel -- sams ----------------------------------------------------------------------- samsg's Profile: http://www.excelforum.com/member.php...fo&userid=1624 View this thread: http://www.excelforum.com/showthread.php?threadid=27652 |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]() not smart enough, but workable... Sub Button1_Click() Set rng = Range("A:A") rng.Cells(1, 1).Select i = 1 While Not IsEmpty(ActiveCell) If i 1 Then rng.Cells(i, 1).EntireRow.Insert rng.Cells(i + 1, 1).EntireRow.Insert rng.Cells(i + 2, 1).EntireRow.Insert rng.Cells(i + 3, 1).EntireRow.Insert rng.Cells(i + 5, 1).Select i = ActiveCell.Row Else i = i + 1 End If Wend End Sub - Manges -- mangesh_yada ----------------------------------------------------------------------- mangesh_yadav's Profile: http://www.excelforum.com/member.php...fo&userid=1047 View this thread: http://www.excelforum.com/showthread.php?threadid=27652 |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Dim cRows As Long
Dim i As Long cRows = Cells(Rows.Count, "A").End(xlUp).Row For i = cRows To 2 Step -1 Cells(i, "A").Resize(4, 1).EntireRow.Insert Next i -- HTH RP (remove nothere from the email address if mailing direct) "samsg" wrote in message ... Hi, i have a list of values like this: 54 24 31 .. I want to place number 54 and then leave 4 blank spaces, the place number 24, and 4 blanks, and so on, so it would look like this 54 24 31 .. How can i do this automatically?, the list is too long to insert 4 cells and then press f4 for each value, is there an autofill that can skip rows , or something that can help me?? Thanks a lot for the help -- samsg ------------------------------------------------------------------------ samsg's Profile: http://www.excelforum.com/member.php...o&userid=16245 View this thread: http://www.excelforum.com/showthread...hreadid=276521 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|