Hello, I need to add an apostrophe to each cell in a long column of numbers.
I do not want to format them as text or format them as custom - our system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something that
will allow me to do it quickly? I want to avoid having to go into each cell
and put the apostrophe in! Thank you in advance....

One way. Change 9 to your column
Sub addapostophe()
mc = 9 'column I
For i = 1 To Cells(Rows.Count, mc).End(xlUp).Row
Cells(i, mc).Value = "'" & Cells(i, mc)
Next i
End Sub

--
Don Guillett
Microsoft MVP Excel
SalesAid Software

"Denise C." wrote in message
...
Hello, I need to add an apostrophe to each cell in a long column of
numbers.
I do not want to format them as text or format them as custom - our system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something
that
will allow me to do it quickly? I want to avoid having to go into each
cell
and put the apostrophe in! Thank you in advance....

I undertand that you want to change the cell contents. Use
= "'" & A1

(first one is double quote, single quote and double quote)
Then copy the result and Paste Value to A1

Hope this helps.


"Denise C." wrote:

Hello, I need to add an apostrophe to each cell in a long column of numbers.
I do not want to format them as text or format them as custom - our system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something that
will allow me to do it quickly? I want to avoid having to go into each cell
and put the apostrophe in! Thank you in advance....

I would create an additional column. That way you don't lose the
functionality of the numbers. Use a formula like:
="'"&Text(a1,"0.00")

The first part is double-quote, apostrophe, double-quote.

Regards,
Fred

"Denise C." wrote in message
...
Hello, I need to add an apostrophe to each cell in a long column of
numbers.
I do not want to format them as text or format them as custom - our system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something
that
will allow me to do it quickly? I want to avoid having to go into each
cell
and put the apostrophe in! Thank you in advance....

Thanks everyone! I used Hakyab's & Fred's method and it worked like a
charm!! Don, appreciate the code, may try that out when I have more time....
really appreciate the quick replies!! Have a blessed day!!
Denise

"Denise C." wrote:

Hello, I need to add an apostrophe to each cell in a long column of numbers.
I do not want to format them as text or format them as custom - our system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something that
will allow me to do it quickly? I want to avoid having to go into each cell
and put the apostrophe in! Thank you in advance....

Glad to help. Thanks for the feedback.

Fred

"Denise C." wrote in message
...
Thanks everyone! I used Hakyab's & Fred's method and it worked like a
charm!! Don, appreciate the code, may try that out when I have more
time....
really appreciate the quick replies!! Have a blessed day!!
Denise

"Denise C." wrote:

Hello, I need to add an apostrophe to each cell in a long column of
numbers.
I do not want to format them as text or format them as custom - our
system
requires the apostrophe at the beginning of the cell. My question is - is
there a way to format one cell with the apostrophe and then copy that
apostrophe down to the other cells?? or can someone write me something
that
will allow me to do it quickly? I want to avoid having to go into each
cell
and put the apostrophe in! Thank you in advance....