Posted to microsoft.public.excel.misc
|
|
How to enclose text in a cell in quotes
Thanks Don, I ended up using the suggesstion above you, but I did document
your solution as well.
Thanks
"Don Guillett" wrote:
Should do it. Change f to suit your column. Send Wild Turkey 101.
Sub makequotes()
mc = "f"
For i = 2 To Cells(Rows.Count, mc).End(xlUp).Row
If Cells(i, mc) < "" And Left(Cells(i, mc), 1) < """" Then
Cells(i, mc).Value = """" & Cells(i, mc) & """"
End If
Next i
End Sub
--
Don Guillett
Microsoft MVP Excel
SalesAid Software
"booker@mgt" wrote in message
...
If I have some text in a cell and I want to wrap that text in quotes, do
you
know of a simple way to do that
i.e Cell says Whoever answers this question is the greatest
and I want it to be €śWhoever answers this question is the greatest€ť
And I want to do that for everything in that particular column?
Thanks
|