I have region containing roughly 100 rows. I would like to create a macro
that deletes every other row within the region. I would like to start by
deleting row 2 & then continue to do so for the rest of the region.

Please advise.

Thanks

try this
Sub deleteeveryotherrow()
For i = Cells(Rows.Count, "a").End(xlUp).Row To 2 Step -2
Rows(i).Delete
Next i
End Sub


--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(E-Mail Removed)
"Curt J" <Curt (E-Mail Removed)> wrote in message
news:73002C76-B288-4E9A-8884-(E-Mail Removed)...
>I have region containing roughly 100 rows. I would like to create a macro
> that deletes every other row within the region. I would like to start by
> deleting row 2 & then continue to do so for the rest of the region.
>
> Please advise.
>
> Thanks

Perfect, thanks for the help Don.

"Curt J" wrote:

> I have region containing roughly 100 rows. I would like to create a macro
> that deletes every other row within the region. I would like to start by
> deleting row 2 & then continue to do so for the rest of the region.
>
> Please advise.
>
> Thanks

Glad to help

--
Don Guillett
Microsoft MVP Excel
SalesAid Software
(E-Mail Removed)
"Curt J" <(E-Mail Removed)> wrote in message
news:A824E147-AEF6-46BB-9091-(E-Mail Removed)...
> Perfect, thanks for the help Don.
>
> "Curt J" wrote:
>
>> I have region containing roughly 100 rows. I would like to create a
>> macro
>> that deletes every other row within the region. I would like to start by
>> deleting row 2 & then continue to do so for the rest of the region.
>>
>> Please advise.
>>
>> Thanks