Thread: I need to find
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Dave Peterson[_3_] Dave Peterson[_3_] is offline
external usenet poster
 
Posts: 2,824
Default I need to find

How about:

Option Explicit
Sub testme()

Dim FoundCell As Range

With ActiveSheet.Range("a:a")
Set FoundCell = .Find(what:="whatever", _
after:=.Cells(.Cells.Count), _
LookIn:=xlFormulas, LookAt:=xlPart, _
SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False)
End With

If FoundCell Is Nothing Then
MsgBox "not found"
Else
FoundCell.EntireRow.Select
End If

End Sub



cdde wrote:

I need help using code that would search column A for value and then
choose the entire row that its in. If anyone can help. Thanx

--
cdde
------------------------------------------------------------------------
cdde's Profile: http://www.excelforum.com/member.php...o&userid=15532
View this thread: http://www.excelforum.com/showthread...hreadid=271040


--

Dave Peterson