View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.misc
Daniel.C[_3_] Daniel.C[_3_] is offline
external usenet poster
 
Posts: 133
Default paste to different rows on different dates

Use the following code :

Sub test()
With Sheets("Sheet1")
.[A65000].End(xlUp).Offset(1) = Date
[Sheet2!B2:H2].Copy .[A65000].End(xlUp).Offset(, 1)
End With
End Sub

HTH
Daniel

I want to update sheet1 every day with row data. Each row means one day.
The data which is to be pasted in today (say row10), comes from
Sheet2(say B2:H2). This data (B2:H2) gets updated during working hours,
and I have final figures at the end of day.
Once I have final figures, I want to paste them into Sheet1 every day,
in a manner that if today's data goes to row10, tomorrow's data should
go to row11, and so on.
Column A in sheet1 contains date.

Please help