How to build a macro that does this...

I have left the most important part out, I want a button there and by pushing it I would like to have all the info copied into cells for example A1:D1. Some easy macro might solve this?

Hi DG83,

Do you want to keep the retrieved data?

The following macro will keep the search result:

Sub test()
Dim lRow As Integer
Dim SearchName As String
lRow = Sheets("Sheet2").Range("A" & Rows.Count).End(xlUp).Row

SearchName = InputBox("Please input name:")

For Each cell In Sheets("Sheet2").Range("A1:A" & lRow)
    If cell.Value = SearchName Then
        Range(cell, cell.Offset(0, 4)).Copy
        Sheets("Sheet1").Range("A" & Rows.Count).End(xlUp).Offset(1, 0).PasteSpecial
    End If
Next

End Sub

I'm sure you will let me know if you desire more from this macro.

Best regards,
Trowa

will try it out! thank you a whole lot so far!

I am still having a hard time with getting the desired results. To keep it the simplest. Lets say I have two names on Sheet 2: A1-Peter,A2-Peter,B1-Johnson,B2-Jackson. On Sheet 1 I would like to be able to enter in a pop up box the search criteria from column A which in this example Peter. After entering Peter I would like that macro to return both Peters and not only the first one: so on sheet 1 I should get Peter Johnson and below that Peter Jackson.
I am very much appreciating your help here. My boss will think I am this super sharp to come up with such ideas:)
Thank you

You can use filter for that. Record macro if u r looking for a macro that would do that