Delete rows from activecell

[al]

Hi All,

I know this is a simple one, but i've been trying to figure out how to
delete the next ten rows from the activecell, using a minimum amount of
coding. I.e. in 1 line.
The delete method should shift lines up.

I've tried stuff like : Rows.[R:R[10]].Delete thinking of using the R1C1
format, but that doesn't work

Can anyone give a few hints?

Cheers,
Al.

 

[Rog]

RANGE(ACTIVECELL.Offset(1),ACTIVECELL.Offset(10)).Delete
SHIFT:=XLUP

rgds

Rog

 

[al]

Cheers Rog,
That helps heaps.

Al.

RANGE(ACTIVECELL.Offset(1),ACTIVECELL.Offset(10)).Delete
SHIFT:=XLUP

rgds

Rog

-----Original Message-----
Hi All,

I know this is a simple one, but i've been trying to figure out how to
delete the next ten rows from the activecell, using a minimum amount of
coding. I.e. in 1 line.
The delete method should shift lines up.

I've tried stuff like : Rows.[R:R[10]].Delete thinking of using the R1C1
format, but that doesn't work

Can anyone give a few hints?

Cheers,
Al.


.

 

[Tom Ogilvy]

Another

ActiveCell.Offset(1,0).Resize(10).EntireRow.Delete

--
Regards,
Tom Ogilvy

Cheers Rog,
That helps heaps.

Al.

RANGE(ACTIVECELL.Offset(1),ACTIVECELL.Offset(10)).Delete
SHIFT:=XLUP

rgds

Rog

-----Original Message-----
Hi All,

I know this is a simple one, but i've been trying to figure out how to
delete the next ten rows from the activecell, using a minimum amount of
coding. I.e. in 1 line.
The delete method should shift lines up.

I've tried stuff like : Rows.[R:R[10]].Delete thinking of using the R1C1
format, but that doesn't work

Can anyone give a few hints?

Cheers,
Al.


.