Escaping Quotes problem

[David]

Hello, advice appreciated please.

I've got this line of VBA:

sScreenContents = Application.Substitute(sScreenContents, """", "\""")

The idea is to find any quotes in a string and escape them with a
backslash before outputting. The problem is that the output has

\""

rather than just the

\"

I was expecting, if I change the code to:

sScreenContents = Application.Substitute(sScreenContents, """", "\"")

the line is highlighted in red.

Any ideas of a way round this, or am I doing something wrong?

Thanks.

 

[Bob Phillips]

sScreenContents = Application.Substitute(sScreenContents, """", "\")


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

 

[Guest]

Try using the ascii value as per this:-

sScreenContents = Application.Substitute(sScreenContents, Chr(34), Chr(92))

I tested it and it works.

Regards,

OssieMac