Adding the " character as text in VBA

Question

Is it possible to add the " character as text in VBA? This character, I assume, is used to specify text in VBA, so when I try and add the following code, I receive errors:

Sheets("SalesDataSheet").Range("C5") = "=TEXT(B5,"mmm yyy")"

Alternatively, is there VB code which can execute the function I am trying to paste to the cell?

Thanks in advance.

Exact duplicate of [Expected End of Statement in formula with quotes](http://stackoverflow.com/questions/24173238/vba-compile-error-expectedend-of-statement) — Jean-François Corbett, Mar 06 '15 at 08:49

score 0 · Answer 1 · answered Mar 06 '15 at 07:32

0

You have to double the quote to escape it:

Sheets("SalesDataSheet").Range("C5") = "=TEXT(B5,""mmm yyy"")"

answered Mar 06 '15 at 07:32

paulroho

1,234
1
11
27

score 0 · Answer 2 · answered Mar 06 '15 at 07:39

0

I also found this as a working alternative to pasting the code into the cell:

Sheets("SalesDataSheet").Range("C5") = Format(Sheets("SalesDataSheet").Range("B5"), "MMM yyyy")

answered Mar 06 '15 at 07:39

Nicholas

11
5

score 0 · Answer 3 · answered Mar 06 '15 at 14:19

0

To add a double quote (") in vba you need to type 4 double quote:

Sheets("SalesDataSheet").Range("C5") = "=TEXT(B5," & """" & "mmm yyy" & """" & ")"

answered Mar 06 '15 at 14:19

genespos

3,211
6
38
70

Adding the " character as text in VBA

3 Answers3