Run Time 424 Error - new to VBA

[Snoopy2010]

Hello -

My macro's objective is to determine if any 1 of 21 string values exists in a list passed to it. If yes, set the cell to the right to '1'.

I defined 1 range (= list passed in, starting with first value and looping to end of list).

I individually coded each of the 21 possible string values as I was not sufficiently skilled to 'double range'.


Using code below, I am getting 'Run Time 424 - Object Required'

Please Login or Register  to view this content.

Where the code breaks, I have tried the following:

Set Products = Worksheet.Range("B13")
Products = Range("B13")
Products = Range("B13").Value
Set Products = Range("B13").Value
Set Products = Range("B13").Select
Products = Range("B13").Select

I AM on IE6. There are no pivot charts involved.

What am I doing wrong? Thanks.

[Andrew-R]

You need to specify which worksheet you're talking about.

Try:

Please Login or Register  to view this content.

[Snoopy2010]

I am looking at the register tab. The macro is the 'test' macro. I modified as suggested. I'm getting an error that I got previously and had corrected -

Run Time Error '13' - Type Mismatch

I believe a 'range' is a type of object and that the 'Set' command is used only in relationship to objects. All cells involved are text (string) cells. I am not sure what the problem is.

Do I need a new thread for this?

[Snoopy2010]

Please Login or Register  to view this content.