Hi

What I'm looking for is the VBA code to FIND the content of cell F8 sheet1.

Basically I've been trying paste cell F8 into EDIT FIND, "This cell value
changes sometimes"

Hope I've been clear in my question.

Thanks in advance

Dave

Sub findF8()
Dim a As Variant
a = Worksheets("Sheet1").Cells(8, 6).Value
MsgBox a
End Sub

Is that what you wanted?

"DaveM" wrote:

Hi

What I'm looking for is the VBA code to FIND the content of cell F8 sheet1.

Basically I've been trying paste cell F8 into EDIT FIND, "This cell value
changes sometimes"

Hope I've been clear in my question.

Thanks in advance

Dave

Hi Nate

Apologizes I should of been a little clearer

With no message

And to find value in Sheet2 Column A would be nice.

Thanks in advance

Dave

"NateBuckley" wrote in message
...
Sub findF8()
Dim a As Variant
a = Worksheets("Sheet1").Cells(8, 6).Value
MsgBox a
End Sub

Is that what you wanted?

"DaveM" wrote:

Hi

What I'm looking for is the VBA code to FIND the content of cell F8
sheet1.

Basically I've been trying paste cell F8 into EDIT FIND, "This cell value
changes sometimes"

Hope I've been clear in my question.

Thanks in advance

Dave

A simplified way
Sub findbasedoncell()
mr = Columns(1).Find(Range("e8")).Row
MsgBox mr
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"DaveM" wrote in message
. uk...
Hi

What I'm looking for is the VBA code to FIND the content of cell F8
sheet1.

Basically I've been trying paste cell F8 into EDIT FIND, "This cell value
changes sometimes"

Hope I've been clear in my question.

Thanks in advance

Dave