putting an if condition based on text in a cell - runtime error 13: type mismatch

Hi,

I have the the following piece of code in my macro. The first line gives me "runtime error 13: type mismatch." How to fix this?

ElseIf Cells(b, i + 4) = "Govt capsules" Or "fresh capsules" Or "final capsules" Then
Sheets("Report").Select
ActiveCell.Value = f

Hi rbs,

please use CODE Tags around your code to make things easier to read.
Try this :

Please Login or Register  to view this content.

Please click the * below if this helps

Worked. Thanks!