Select your values and run:


Sub dont_quote_me()
Dim r As Range
For Each r In Selection
r.Value = Chr(34) & r.Value & Chr(34)
Next
End Sub
--
Gary''s Student


"Blasting Cap" wrote:

I have a column of numbers (nearly 400 or more) in two separate
spreadsheets.

I need to copy this column of numbers into a SQL query, and to do that,
I will have to have it formatted like:

'12345',
'23456',

and so on.

It's currently:
12345
23456

Is there a way that I can format/edit each cell (other than manually) to
format it to bring it into SQL for a query?

Any help/ideas appreciated.

Thanks,

BC