VBA check if cell contain certain string or text

If INSTR(1,ActiveSheet.Range("C6").Value , "CHECKED OUT")>0 then