VBA Code for FIND values

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

DaveM - 30 May 2008 12:12 GMT

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

Reply to this Message

NateBuckley - 30 May 2008 12:24 GMT

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

Is that what you wanted?

> Hi
>
[quoted text clipped - 8 lines]
>
> Dave

Reply to this Message

DaveM - 30 May 2008 13:05 GMT

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

> Sub findF8()
> Dim a As Variant
[quoted text clipped - 17 lines]
>>
>> Dave

Reply to this Message

Don Guillett - 30 May 2008 13:22 GMT

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

Signature

Don Guillett
Microsoft MVP Excel
SalesAid Software
dguillett1@austin.rr.com

> Hi
>
[quoted text clipped - 9 lines]
>
> Dave

Reply to this Message