How to handle double quotes in string text.

[mdd16]

Hello,

I am getting error due to double quotes being part of a string that I am trying to create.

Sub AddStr_tel()
Dim TelText As String

TelText="=HYPERLINK(CONCAT("tel:",A1),A1)"

Selection.value = TelText

End Sub

Hope someone can help solve this trouble.

Best Regards

Mohan Dhingra

 

[Phuoc]

Try this

TelText = "=HYPERLINK(CONCAT(""tel:"",A1),A1)"