Find Command
 

Hi
use
n = c.row

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im Newsbeitrag
...
Thank you so much for all of your help. However, it
still isn't working just right. I want n to be the row
of the location of this cell. It is giving me the value.

Dim c As Range
Dim n As Double

With wks_S.Range("B2:B" & SectionsFinalRow)
Set c = .Find(1922892106,LookIn:=xlValues)
If Not c Is Nothing Then
n = c.Value

End If
End With

-----Original Message-----
Hi
quite normal as this value is more than an integer can
store. Try:
Dim n As double

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im
Newsbeitrag
...
Here is what I have. I am now getting an overflow
error. Thanks a lot for the help.

Dim c As Range
Dim n As Integer

With wks_S.Range("B2:B" & SectionsFinalRow)
Set c = .Find
(1922892106,LookIn:=xlValues)
If Not c Is Nothing Then
n = c.Value
End If
End With


-----Original Message-----
Hi
you have to define n as range and access its value
with
n.value

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im
Newsbeitrag
...
I have it set as an integer because I later use that
number to call upon that row. What should I set it
to?



-----Original Message-----
What have you Dim'd n as?

When you use Set, n must be an object, in this
case a
Range.



In article <18a401c4a24e$6cf04150
,
"Adam"
wrote:

I can't figure out why this isn't working. I am
getting
a "Object Required" compiler error after the n =

With wks_S.Range("B2:B" & SectionsFinalRow)
Set n = .Find
(1922892106,LookIn:=xlValues)
.


.


.

Find Command
 

It seems to have worked. Thank you so much for the help
and being so patient with me.


-----Original Message-----
Hi
use
n = c.row

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im
Newsbeitrag
...
Thank you so much for all of your help. However, it
still isn't working just right. I want n to be the row
of the location of this cell. It is giving me the
value.

Dim c As Range
Dim n As Double

With wks_S.Range("B2:B" & SectionsFinalRow)
Set c = .Find
(1922892106,LookIn:=xlValues)
If Not c Is Nothing Then
n = c.Value

End If
End With

-----Original Message-----
Hi
quite normal as this value is more than an integer can
store. Try:
Dim n As double

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im
Newsbeitrag
...
Here is what I have. I am now getting an overflow
error. Thanks a lot for the help.

Dim c As Range
Dim n As Integer

With wks_S.Range("B2:B" & SectionsFinalRow)
Set c = .Find
(1922892106,LookIn:=xlValues)
If Not c Is Nothing Then
n = c.Value
End If
End With


-----Original Message-----
Hi
you have to define n as range and access its value
with
n.value

--
Regards
Frank Kabel
Frankfurt, Germany

schrieb im
Newsbeitrag
...
I have it set as an integer because I later use
that
number to call upon that row. What should I set
it
to?



-----Original Message-----
What have you Dim'd n as?

When you use Set, n must be an object, in this
case a
Range.



In article <18a401c4a24e$6cf04150
,
"Adam"
wrote:

I can't figure out why this isn't working. I
am
getting
a "Object Required" compiler error after the
n =

With wks_S.Range("B2:B" & SectionsFinalRow)
Set n = .Find
(1922892106,LookIn:=xlValues)
.


.


.


.