Hi everbody,

This is my first question in this great forum and I hope I find the
satisfactory answer for it,

I have this code witch works on moving one record only form a sheet to
another, I want to edit it to be able to move more than one record at
the same time.


Code:
--------------------
Sub FillSalesList()
With Sheets("2").Columns(1).Rows(65536).End(xlUp)
.Offset(1, 0) = Sheet1.[a2]
.Offset(1, 1) = Sheet1.[b2]
.Offset(1, 2) = Sheet1.[c2]
.Offset(1, 3) = Sheet1.[d2]
.Offset(1, 4) = Sheet1.[e2]
.Offset(1, 5) = Sheet1.[f2]
.Offset(1, 6) = Sheet1.[g2]
End With
[a2] = [a2] + 1
[b2:g2].ClearContents
End Sub
--------------------

I hope that my question is clear for all and I find the answer for it.


--
LoveCandle
------------------------------------------------------------------------
LoveCandle's Profile: http://www.excelforum.com/member.php...o&userid=28612
View this thread: http://www.excelforum.com/showthread...hreadid=482711