Using Text in a Formula or FormulaR1C1 property

[Turtle_Todd]

I want to use a logical if statement checking a text word in a formula
statement.

I want programmatically to create the cell
=IF(A1="apples","Yes","No")

However, when I enter
Range("B1").Formula="=IF(A1="apples","Yes","No")"

in VB the quotes mess this all up. The single quotes don't work either
Range("B1").Formula="=IF(A1='apples','Yes','No')"

Any ideas?

 

[Gary''s Student]

Double up the double quotes:

Sub dural()
s = "=IF(A1=""apples"", ""yes"",""no"")"
Range("B1").Formula = s
End Sub

 

[Jacob Skaria]

Dim strTemp
Dim strValue

strValue = "Apple"

strTemp = "=IF(A1=""" & strValue & """,""yes"",""no"")"
Range("B1").Formula = strTemp

If this post helps click Yes

 

[Turtle_Todd]

works great, thanks

Double up the double quotes:

Sub dural()
s = "=IF(A1=""apples"", ""yes"",""no"")"
Range("B1").Formula = s
End Sub