nope, rSusan is properly declared as a range (i just didn't list it,
sorry - i was trying to simplify the problem).

Dim rSusan As Range

:)
susan


On Dec 31, 11:50*am, Leith Ross
wrote:
Susan;163759 Wrote:





i've done this kind of thing a thousand times, but i can't get this
one to work.........
'===========================
Dim cell as Range

myLastSusanRow = ws3.Cells(10000, 1).End(xlUp).Row + 1
Set rSusan = ws3.Range("a2:a" & myLastSusanRow)

For Each cell In rSusan
If cell.Value = Me.txtBook.Value Then
'minor stuff
Else
'do nothing
End If
Next cell
'=========================
the intellisense will give me the correct information for
me.txtBook.Value, but gives me nothing for cell.value. *i've tried
cell.text, that does nothing. *the intellisense only works if i just
use "cell", but the comparison doesn't work. *i've put in a
msgbox cell.value
test and that gives me the correct information.
the cell range is on Sheet3, and the txtBook textbox is on Sheet2.
the code is held in the Sheet2 area, not in a general module. *i'm
using XP 2000xl.
i know it's something minor & stupid, but what am i doing wrong?
thanks in advance!
:)
susan

Hello Susan,

I don't see where you declared rSusan. VBA will assume the collection
rSusan is a variant and intellsense has to know what type of collection
you have in to display the properties and methods.

Sincerely,
Leith Ross

--
Leith Ross
------------------------------------------------------------------------
Leith Ross's Profile:http://www.thecodecage.com/forumz/member.php?userid=75
View this thread:http://www.thecodecage.com/forumz/sh...d.php?t=45505- Hide quoted text -

- Show quoted text -