Copy, Search, Then Paste Needed

I suggest you attach a small sample workbook illustrating your data and desired results.

Thanks for the fast response!
Here's a sample. Basically what I need,

Using a command button
Copy cells B1:E1 then paste the values to sheet2 next to the date based on cell A1 in sheet1.

If you change the (criteria) date in A1 than click the command button cells B1:E1 will be copied next to that date, and so on.

OK, that's easily done, but why couldn't you just use the VLOOKUP formula?

Where are the values in B1:E1 coming from when you change the date?

Sounds like you know your stuff StephenR

I want the user to ensure that the data in sheet1 is correct before copying the values to sheet2. A command button adds a user step but gives the added security. If that makes any sense.

Sort of, though you could just use data validation. Anyway, try assigning this to a button:

Sub x()

Dim rDates As Range, r As Long

With Sheet2
    Set rDates = .Range("A1", .Range("A1").End(xlDown))
    On Error GoTo errline
    r = WorksheetFunction.Match(Range("A1"), rDates, 0)
    On Error Resume Next
    .Cells(r, 2).Resize(, 4).Value = Range("B1:E1").Value
End With

Exit Sub

errline: MsgBox Range("A1") & " not found"

End Sub