Try

Dim prefix As String


prefix = "'" & Right(x, Len(x) - 20)   '    DoubleQuote SingleQuote DoubleQuote