I'm not quite sure what you are asking, but I think this will at least
help.
For now I filled cells A1:A20 with the numbers 0-20. I then added this
line to your macro:

Range("A1").End(xlDown).Select

So your new macro looks like this:

Sub Bleh()
Rows("10:12").Select
Selection.Copy
Range("A1").End(xlDown).Select
ActiveSheet.Paste
Range("B16:B18").Select
Application.CutCopyMode = False
Selection.AutoFill Destination:=Range("B16:B21"), Type:=xlFillDefault
Range("B16:B21").Select
End Sub

If that's not what you're looking for, I think it will at least give
you a good start finding it.


--
mkerstei
------------------------------------------------------------------------
mkerstei's Profile: http://www.excelforum.com/member.php...o&userid=25688
View this thread: http://www.excelforum.com/showthread...hreadid=549504