Sub Tester3()
With Worksheets("Sheet1")
.Range("A10:F15").Copy
End With
With Worksheets("Sheet3")
.Range("F6").Insert xlShiftDown
End With
Application.CutCopyMode = False
End Sub

Not sure what copyorigin refers to.

--
Regards,
Tom Ogilvy

"David Lewis" wrote in message
...
I meant without using select/copy. That's klunkier and
frequently leaves the shimmering-dotted box on the
worksheet. (by the way, hHow do I get rid of that).

Thanks. --David.

-----Original Message-----
How does the CopyOrigin argument to the Insert function as
applied to ranges work?

Actually, how does the whole Range.Insert function work?
The documentation in help isn't too helpful, nor is the
book I'm using (Walkenbach)

What I want to do is insert in one worksheet a copy of a
range of rows from another sheet.

Thanks. --David.
.