Selecting and copying from a list

[shennigan]

How does one efficiently choose from one list and create another in Excell.

Example ( Choosing every 4th set of data pairs)
when like this in a spreadsheet
96 121



96.5 110




97 109



to look like this
96 121
96.5 110
97 109

 

[Mike H]

Hi,

I'm not clear whether these data pairs are in the same cell so we'll start
with this

=INDEX($A$1:$A$1000,ROWS($A$1:$A1)*4)

The above formula extracts the data from row 4 of column A drag down 1 row
for row 8 etc.

Mike

 

[Don Guillett]

something like
Sub copyevery4th()
For i = 1 To Cells(Rows.Count, "a").End(xlUp).Row Step 4
dlr = Cells(Rows.Count, "b").End(xlUp).Row + 1
Cells(i, "a").Copy Cells(dlr, "b")
Next i
End Sub