David gonzalez
New Member
- Joined
- Nov 19, 2013
- Messages
- 16
Hi,
on daily basis and with aid of excel helper info I create a report (between 9 to 24 rows).
So i have a vba code that copy this Info and paste the data in next blank cell in Report area located in same sheet (but different area).
The code is working fine, except that always newer data it copy at bottom of the sheet and data is getting bigger.
Then what i need to accomplish is to modify the line of code and change the Order of copy
From Top newer (today data) and move/shift the Older (yesterday data) to Bottom.
This the actual data (see date Oct 5, oct 6, oct 7 down)
This Is the Ideal Data with newest date at Top ( Oct 7, Oct 6, Oct 5..)
This is the actual code
Thank you !
Best Regards
David
on daily basis and with aid of excel helper info I create a report (between 9 to 24 rows).
So i have a vba code that copy this Info and paste the data in next blank cell in Report area located in same sheet (but different area).
The code is working fine, except that always newer data it copy at bottom of the sheet and data is getting bigger.
Then what i need to accomplish is to modify the line of code and change the Order of copy
From Top newer (today data) and move/shift the Older (yesterday data) to Bottom.
This the actual data (see date Oct 5, oct 6, oct 7 down)
This Is the Ideal Data with newest date at Top ( Oct 7, Oct 6, Oct 5..)
This is the actual code
Code:
Sub ReporTrack_Test() Dim j As Long
For j = 4 To 12
If Cells(j, 58).Value > 1 And Cells(j, 58).Value < 36 Then _
Cells(Rows.count, 20).End(xlUp).Offset(1).Resize(, 22).Value = Cells(j, 58).Resize(, 22).Value
Next j
End Sub
Thank you !
Best Regards
David