cell address code

D

Dave

Is there any VBA code for Excel 97 that will return a
specific cell address that can be located only by values
in other cells?
 
W

William

Dave

Try

Sub test()
Dim x As String
x = "wx" ' or say 2312
MsgBox Range("B9:B42").Find(What:=x, LookIn:=xlFormulas,
LookAt:=xlWhole).Address
End Sub
--
XL2002
Regards

William
[email protected]

| Is there any VBA code for Excel 97 that will return a
| specific cell address that can be located only by values
| in other cells?
 
B

Bob Phillips

If using Find, allow for it not being found.

Dim oCell As Range

Set oCell = Range("B2:B42").Find(What:=x, LookIn:=xlFormulas,
LookAt:=xlWhole)
If Not oCell Is Nothing Then
Msgbox oCell.Address
End If
 
Top