Help Please
Isn't staff no unique?
With Worksheets("Employees")
set rng = .Range(.cells(2,1),.cells(rows.count,1).End(xlup))
End with
res = Application.Match(clng(strStaffno),rng,0)
if not iserror(res) then
msgbox "Row is " & rng(res).Row
End if
--
Regards,
Tom Ogilvy
"Robert Couchman" wrote in message
...
Please can i have some help??
i have a list box, the data contained is:
Staff no. (Column A), First Name (Column B), surname
(Column C)
i want to use a double click command what will display
data from the row on whcihc the data is contained (the
list box is filled using a search feature that will only
display the specific records needed)
i have tried using the list value (that would be
cell.value + " " + cell.offset(0,1).value + " " +
cell.offset(0,2).value, but this has not worked!!)
Please provide any help necessary for this project.
Many thanks,
Robert Couchman
|