searching for values in excel and copy them to another worksheet

[solo_razor]

Hello,
I have a problem with vba in excel
I want to search for a value in a worksheet and then copy the data that
lies beneath it to another worksheet.

Thx

 

[Dave Ramage]

One method is as follows

Sub Demo
Dim rngR as Range

Set rngR = ActiveSheet.Cells.Find("TheText")
If rngR is Nothing Then
'value not found
MsgBox "Not Found"
Else
'get value of cell below
MsgBox rngR.Offset(1,0).Value
End If

End Sub

Look up the Find method in help to check out the various
options.

Cheers,
Dave