Dear freinds,

hi

I have DTPicker1 and DTPicker2 on my userform through these i copy data from Sheet1 for a specific period to paste data sheet2. The following codes i am using

Private Sub CommandButton1_Click()

Worksheets("sheet1").Select
Dim x As Long
Dim y As Long
y = 1
For x = 1 To 65536
If Cells(x, 1).Value >= CDate(DTPicker1) And Cells(x, 1).Value <= CDate(DTPicker2) Then
Sheets("sheet2").Cells(y, 1).Value = Cells(x, 1).Value
Sheets("sheet2").Cells(y, 2).Value = Cells(x, 2).Value
Sheets("sheet2").Cells(y, 3).Value = Cells(x, 3).Value
y = y + 1
End If
Next x
End Sub

I am copying data only from one sheet1 through DTPickers to paste into Sheet2. My question is if i have two sheets i.e sheet1 and sheet2 having date field at col A in each sheet . What would be the code to copy data from sheet1 and sheet2 to paste into sheet3 using same DTPicker1 and DTPicker2.

Thanks

SYED HAIDER ALI