What I'm saying is that if your cursor is on the cell containing what you
are looking for on the source sheet the row of the source sheet will be
copied to that cell.

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Lonpuz" wrote in message
...
Sorry Don, but I'm not sure what you mean by "active cell". Is that the
cell
in the range on Worksheet B that contains the matching number?

"Don Guillett" wrote:

This will find 119 if in the activecell of the destination sheet on the
source sheet and copy the entire row to the row of the active cell.

Sub findandcopy()
what = ActiveCell
Sheets("sheet2").Rows(Sheets("sheet2").Columns(1) _
.Find(what).Row).Copy ActiveCell
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Lonpuz" wrote in message
...
In worksheet A,I have a range of data beginnning in a2;
A B C D
1 Unit# Client Name Phone# Address
2 119 Fred Wilson 6561578 34 anystreet

In worksheet B, a have a list of data organized the same way;
A B C D
124 119 Fred Wilson 6561578 34 anystreet
125 120 John Smith 6564877 39 Anytown

I need a macro to find the cell containing the unit number from
Worksheet
A
in column A on Worksheet B, and then select it. Then copy/paste values
the
data on Worksheet A (A2:D2 in my example) over to Worksheet B (would be
A124
matching unit number 119 in my example).