Something like

On Error Resume Next
iPos = Application.Match(txtLastname, Range("A:A"), 0)
On Error GoTo 0
If iPos 0 Then
MsgBox Cells(iPos, "A").Value & ", " & _
Cells(iPos, "B").Value & ", " & _
Cells(iPos, "C").Value & ", " & _
Cells(iPos, "B").Value
End If

--

HTH

RP
(remove nothere from the email address if mailing direct)


"Frank" wrote in message
...
Hi,

I have the following situation:
I have 1 worksheet(Employees) with all the last names(Column A), First
names
(Column B), phonenumbers (Column C) and location (Column D) of the
employees.
I created 2 userforms with the fields Firstname, Last name and
Phonenumber.
1 Userform (Searchform) where users can enter for example the first name
of
the employee and press the button search.
Now the second form (Resultform) has to pop up with the First name, Last
name and phonenumber of the employee. What code is needed for this?
So what i want is to create a telephome book programm with excel.
I have searched most of the topics in this database but i can't find this.

Can somehelp me?

Thanks!