Automatically copy data from one worksheet to another based on current month

Kihoro

New member
Joined
Sep 19, 2012
Messages
6
Reaction score
0
Points
0
Location
Nairobi, Kenya, Kenya
hi guys
i would like to copy data from the table in worksheet 'pending stocks' to the worksheet 'historical data' based on current month. eg all data range B4:E15 that has E.T.A details as September 2012 or any month before September 2012 should be copied to worksheet 'historical data' if the current system month is equal to September 2012.
is this possible? :confused2:
please find attached
i hope i have explained my question well.

thanks in advance.:)

sincerely

john kihoro
 

Attachments

  • testmove.xlsm
    30.7 KB · Views: 47

cherambane

New member
Joined
May 9, 2012
Messages
4
Reaction score
0
Points
0
Location
Karnataka, India
Try This.


Code:
Private Sub tester()

Sheets("pending stocks").Select
Range("B4").AutoFilter Field:=4, Criteria1:="<=" & Str(Date)
Range("Table2").Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.Copy
Sheets("historicaldata").Select
ActiveSheet.Paste

End Sub

Regards,

Basheer Cherambane (India)


hi guys
i would like to copy data from the table in worksheet 'pending stocks' to the worksheet 'historical data' based on current month. eg all data range B4:E15 that has E.T.A details as September 2012 or any month before September 2012 should be copied to worksheet 'historical data' if the current system month is equal to September 2012.
is this possible? :confused2:
please find attached
i hope i have explained my question well.

thanks in advance.:)

sincerely

john kihoro
 
Top