how to delete alternate rows in a spreadsheet?

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

SI - 16 Apr 2008 11:44 GMT

hello, i have a spreadsheet with about 60,000 data points in it, Excel will
only let me plot 32,000 points!
Is there a way/formular so i can delete everyother row? ie,so instead of
having rows numbered 1,2,3,4,5,6,7,8,9,10. I would end up with 1,3,5,7,9 and
so on!
This would give me around 30,000 points!

Thanks,
Simon.

Reply to this Message

Barb Reinhardt - 16 Apr 2008 12:31 GMT

In a helper column put this: =MOD(ROW(),2)
Autofilter the data and select the value that you want to delete and delete
it.
Then delete the helper column.

Signature

HTH,
Barb Reinhardt

> hello, i have a spreadsheet with about 60,000 data points in it, Excel will
> only let me plot 32,000 points!
[quoted text clipped - 5 lines]
> Thanks,
> Simon.

Reply to this Message

Gord Dibben - 16 Apr 2008 23:56 GMT

Sub delete_even_rows()
Dim r As Long
Dim rng As Range
Dim numLoops As Long

Set rng = Range("A1:A60000")
numLoops = Int((rng.Rows.Count / 2))
For r = 1 To numLoops
rng(r + 1, 1).entirerow.Delete
Next
End Sub

Gord Dibben MS Excel MVP

>hello, i have a spreadsheet with about 60,000 data points in it, Excel will
>only let me plot 32,000 points!
[quoted text clipped - 5 lines]
>Thanks,
> Simon.

Reply to this Message

MartinW - 17 Apr 2008 10:19 GMT

Hi Simon,

Another option is to copy them to a new sheet thus
leaving your raw data intact.

With your raw data in Sheet1 column A
Put this in Sheet2 column A and drag down 30000 odd rows.
=OFFSET(Sheet1!A$1,(ROWS($1:1)-1)*2,,)
adjust the Sheet name and column to suit.

This will extract every second value from Sheet1 to Sheet2

HTH
Martin

> hello, i have a spreadsheet with about 60,000 data points in it, Excel
> will
[quoted text clipped - 7 lines]
> Thanks,
> Simon.

Reply to this Message