find values and identifying cell-adress
 

I would like write a macro that finds a certain text on an Excel-spreadsheet
and then display the adress of the cell(s) containing the specified
information in another cell. Help anyone?
--
banker

find values and identifying cell-adress
 

dim rng as range
dim findVal as string
set rng = worksheets(1).cells.find(what:=findVal,lookat:=xlw hole)
msgbox rng.address
range("a1")=rng.address


--
anusha2525
------------------------------------------------------------------------
anusha2525's Profile: http://www.excelforum.com/member.php...o&userid=35408
View this thread: http://www.excelforum.com/showthread...hreadid=551771