Need To Add Quotes Before and After the Text In a Column

[khemu]

Well this will enable you to place double-quotes in the whole sheet :

Code:

Copy      Help

Private Sub Worksheet_Change(ByVal Target As Range)
    If InStr(Target.Value, """") = 0 Then
       Target.Value = """" & Target.Value & """"
    End If
End Sub

You can always refine it more as per your requirement.