copying format values -phone

I have several spreadsheets that have thousand of phone numbers
i need the phone number values to be like (123) 233-5121
If I have a number like 1232335121 I can change the format to look like a phone number but that
does not change the actual value.
Is there a way to either
1. copy the format and past it as a value.
I tried this with copy and past values but of course that did no good.
2. if 1. is not possible is there some sort of macro or something that I can create that will go in and put parentheses around the 1st 3 numbers add a space and then a - in between 6th and 7th number.

Thanks