double quotes around string in formula craeted in vba

[tegger]

I'm trying to enter this formula:

=Work!A4&"Fri Night"



with this line of code:

Worksheets(3).Cells(r, x).Value = "=Work!A" & r & "Fri Night"



I can't see how to get the double quotes around the Fri Night.



If anyone can help, I'd be most grateful,

DL

 

[Guest]

This should do it.

Worksheets(3).Cells(r, x).Value = "=Work!A" & r & "
& ""Fri Night"""

 

[Steve Garman]

I'm trying to enter this formula:

=Work!A4&"Fri Night"



with this line of code:

Worksheets(3).Cells(r, x).Value = "=Work!A" & r & "Fri Night"

Worksheets(1).Cells(r, x).Value = """=Work!A""" & r & """Fri Night"""

 

[Tom Ogilvy]

sStr = "=Work!A" & r & "&" & chr(34) & "Fri Night" & chr(34)
worksheets(3).Cells(r,x).Value = sStr


testing in the immediate window:

r = 4
? "=Work!A" & r & "&" & chr(34) & "Fri Night" & chr(34)
=Work!A4&"Fri Night"

 

[tegger]

Thank you. That did the trick.
A very elegant solution if I may say so.
DL