Object Variable Error

[dubczech]

I'm getting the "Object Variable Not Set" Error on the following lines of code:

Cells.Find(What:="Current Brand").Activate
ActiveCell.Offset(0, 1).Activate
Curr_Brand = ActiveCell.Value

'Curr_Brand is defined as a String.

Any help would be great.

Thanks,

 

[shg]

It means that the value wasn't found, so there is no cell to activate.

When using Find, you should always specify LookIn, LookAt, SearchOrder, and MatchByte, because their values persist from those set in the user interface for previous Finds.

 

[dubczech]

This does not help the issue. Even when I define all of the optional components in the find command, I still get the same error.

 

[shg]

It means that the value wasn't found, so there is no cell to activate.

That still applies.