How to remove quotation marks from a string?

[shahin]

It is perhaps a childlike problem but I can't manage to solve it. What I wish to do is replace quotes from the value of Range("A1"), so that the output becomes "HI THERE" to HI THERE.

I tried like below but it doesn't allow me to put a quotation mark within quotation mark:

Sub remove_quotes()
    Dim str_val As String
    str_val = Replace(Range("A1").Value, " ", "") ''I attempted to do like """ changing the first quotation but couldn't
    MsgBox str_val
End Sub

Once again:
The value of Range("A1") = "HI THERE"

What I would like to see:
The value of Range("A1") = HI THERE

 

[shahin]

Seems to have found the solution:

Sub remove_quotes()
    Dim str_val As String
    str_val = Replace(Range("A1").Value, Chr(34), "")
    [B1] = str_val
End Sub

 

[YasserKhalil]

Try this code

Sub remove_quotes()
    Dim str_val As String
   
    str_val = Replace(Range("A1").Value, """", "")
    MsgBox str_val
End Sub

 

[shahin]

Yes. This is the way I was expecting so do. Thanks YasserKhalil.

 

[YasserKhalil]

You're welcome my friend. Glad I can offer some help