How about:
VB Code:
  1. MsgBox Format("0123456789", "(000) 000-0000")
will yield: (012) 345-6789


Just note; that a 6 digit number (123456) will become: (000) 012-3456