تبدیل مقدار داخل یه سلول به عدد

[master]

سلام
یه ستون هست که داخلش عدد هست اما نمیدونم توی چه حالتی ذخیره شده که کنار هر خونه اون علامت فلش سبز رنگ هست
من میخواستم عدد هاش به صورت سه رقم سه رقم جدا بشن توی مارویی که نوشته بودم اینجوری نوشتم:
Selection.NumberFormat = "#,##0"
ولی تست کردم دیدم انجام نمیده اولش فکر کردم مشکل از کد هست ولی بعدش خودم دستی ستون رو انتخاب کردم و رفتم از قسمت Number این کار رو کردم بازم نشد!
بعد که یکم باهاش ور رفتم دیدم اول باید از طریق اون علامت سبز رنگ کنار هر سلول گزینه Convert to Number رو بزنم بعد دیگه اون کار رو انجام بدم سه رقم سه رقم جدا میشه
حالا میخواستم بدونم اگه این عمل کانورت رو بخوام به صورت کد توی ماکرو بنویسم باید چه کدی بنویسم؟
اینک عکس اون ستون:

http://www.upload7.ir/imgs/2014-08/82894492561569459352.jpg

مقادیر داخل ستون همه عدد هستن ولی نمیدونم چرا باید این کانورت صورت بگیره!
با تشکر

[علی فاطمی]

با سلام و وقت بخیر ببینین کد زیر کمکتون می کنه:

For Each xCell In Selection
    xCell.Value = CDec(xCell.Value)
 Next xCell
Selection.NumberFormat = "#,##0"

[master]

موقه اجرا ماکرو روی این خط متوقف میشه و ارور میده:
xCell.Value = CDec(xCell.Value)
با تشکر

[علی فاطمی]

موقه اجرا ماکرو روی این خط متوقف میشه و ارور میده:
xCell.Value = CDec(xCell.Value)
با تشکر

لطفا فایل پیوست رو ملاحظه کنین.
مثلا فرمت سلول A1 تا A10 رو به text تغییر بدین بعد اعداد دلخواه وارد کنین همون فلش سبز رنگ رو مشاهده می کنین . حالا A1 تا A10 رو select کنین بعد کامن باتن رو بزنین .