I need help to design an excel 97 macro that will delete
the currently selected row and a hidden one immediately
under it in their entirety.

Any help is appreciated

try this
ActiveCell.Resize(2, 1).EntireRow.Delete

--
Don Guillett
SalesAid Software

"RKettle" wrote in message
...
I need help to design an excel 97 macro that will delete
the currently selected row and a hidden one immediately
under it in their entirety.

Any help is appreciated

Sub testit()
Dim rng As Range

With ActiveCell.EntireRow
Set rng = Range(.Cells, .Offset(1, 0))
End With
rng.Delete xlUp
End Sub

Rob

"RKettle" wrote in message
...
I need help to design an excel 97 macro that will delete
the currently selected row and a hidden one immediately
under it in their entirety.

Any help is appreciated

Ignore my code, use Don's. Resize is certainly the way to go.


"Rob van Gelder" wrote in message
...
Sub testit()
Dim rng As Range

With ActiveCell.EntireRow
Set rng = Range(.Cells, .Offset(1, 0))
End With
rng.Delete xlUp
End Sub

Rob

"RKettle" wrote in message
...
I need help to design an excel 97 macro that will delete
the currently selected row and a hidden one immediately
under it in their entirety.

Any help is appreciated

Thanks all, I'll give it a try on Monday when I get back to the office.

Rob

The resize code works great.

Thanks all

Rob