Odd behavior in Find.Execute code

[Ed]

I want to find doubled double quotes and replace with single double quotes
(change ""hi"" to "hi"). But my code is acting odd. I've got:
rngWork.Find.Execute FindText:="""", _
ReplaceWith:=""", Replace:=wdReplaceAll"

Noticce the double quote after ReplaceAll - the VBE puts that there! I
suspect it thinks that's the end of my ReplaceWith text string? How can I
write this to get around this problem?

Ed

 

[Peter Hewett]

Hi Ed

To quote one set of double quotes "", use six consecutive double quote characters!
Debug.Print """"""

prints:

""

HTH + Cheers - Peter

 

[Ed]

Thanks, Peter. It would have taken me a while to guess that one!

Ed