Adding apostrophe to cells

We have a column of numbers that need to have an apostrophe placed in front of them in each cell. Ive tried to add them using a formula, but the software that we are uploading the xls file to doesnt like the formula in the cell and stops the upload. Adding the ' manually, however, works fine. Is there a way to create a macro that mimics the adding of the apostrophe?

Thanks in advance!

Not sure to undertand what you want to do...

If you want to add apostrophe to force data to be text, you could you have a VBA macro do:

myrange = "G5:H8"
For Each cell In ActiveSheet.Range(myrange)
cell.Value = "'" & cell.Value 'NOTE: double quote - apostrophe - double quote
Next c

or in another cell, you could use

=TEXT(yourcellwithnumericalvalue,"@")

I just have a column (A) with hundreds of rows. Each cell has a number. I just want to add an apostrophe to the front of each number.

Originally Posted by scottdog129

I just have a column (A) with hundreds of rows. Each cell has a number. I just want to add an apostrophe to the front of each number.

Then you could go with

myrange = "A5:A1005"
For Each cell In ActiveSheet.Range(myrange)

if left(cell.Value,1)<>"'" Then cell.Value = "'" & cell.Value 'NOTE: double quote - apostrophe - double quote

Next cell