How to input quotation marks within a cell using VBA

So here's my code:

Please Login or Register  to view this content.

So the variable SearchCrit is what I input on the Inputbox. However, let's say if I'm searching for the word RED in cell D6, unless I input RED as "RED" in the Inputbox, the formula won't work correctly. Is there a way to input the " " within the cell using VBA so I don't have to manually type it in the Inputbox?

Yeah, I actually figured it out. Here's what I did:

Please Login or Register  to view this content.

I just had to add 4 quotation marks and that did the trick. Not sure what the logic behind what I did was, but it works. If anyone knows the logic please chime in.

Thanks Simon, yours actually makes more sense than what I did. I just threw in a bunch of quotation marks and it happened to work. I like your way much better. Thanks!