I have been trying to cut a range and paste it using the offset method
using the Range /offset method. I can select the range easy enough, I just
can't seem to paste it using offset . Here's my failed code:

Range(ActiveCell, ActiveCell.End(xlToRight)).Cut (Offset(-3, 1))

I just want to take the range, and move it up 3 rows and over 1 column

Thanks for your help.

set rng = Range(ActiveCell, ActiveCell.End(xlToRight))
rng.Cut rng.Offset(-3, 1)

--
Regards,
Tom Ogilvy

"John" <John @discussions.microsoft.com wrote in message
...
I have been trying to cut a range and paste it using the offset method
using the Range /offset method. I can select the range easy enough, I
just
can't seem to paste it using offset . Here's my failed code:

Range(ActiveCell, ActiveCell.End(xlToRight)).Cut (Offset(-3, 1))

I just want to take the range, and move it up 3 rows and over 1 column

Thanks for your help.

Try:

Range(ActiveCell, ActiveCell.End(xlToRight)).Cut
Destination:=ActiveCell.(Offset(-3, 1))

HTH

"John" wrote:

I have been trying to cut a range and paste it using the offset method
using the Range /offset method. I can select the range easy enough, I just
can't seem to paste it using offset . Here's my failed code:

Range(ActiveCell, ActiveCell.End(xlToRight)).Cut (Offset(-3, 1))

I just want to take the range, and move it up 3 rows and over 1 column

Thanks for your help.