مكن عمل ماكرو لهذا الملف لتحويل العمود فيه من نص الى رقم بحيث يقبل الجمع

[اوفيس 2003]

ممكن عمل ماكرو لهذا الملف لتحويل العمود فيه من نص الى رقم  بحيث يقبل الجمع  لأني جربت اعمل ماكرو واختارت بالزر الأيمن لتصحيح الخطأ لتحويل النص الى رقم او من الخيارات وحولته الى ارقام وعندما طبقت الماكرو لم يتحول ولا اعرف من اين الخطأ

 

الملف موجود في المرفق وهذا الماكرو اللي تم عمله

انا اريد الماكرو او الكود  مرفق مثل ما رافقته هنا  ،، لأن ارفقت الموضوع هذا في موضوع اخر فحبيت ان افصله ليستفيد الغير


 

Sub Macro9()
'
' Macro9 ماكرو
'

'
    Range("A2:A11").Select
    Selection.NumberFormat = "0.00"
    Range("A14").Select
End Sub

test9009.rar

[ياسر خليل أبو البراء]

جرب الكود التالي

Option Explicit

Sub ConvertTextToNumber()
    Dim Cell As Range
    For Each Cell In Range("A1:A10")
        Cell.Value = Cell.Value * 1
    Next Cell
End Sub

[اوفيس 2003]

مشكور ياغالي

ياريت لو تخليه اضافة كسور له  علامتين عشريتين

[ياسر خليل أبو البراء]

Option Explicit

Sub ConvertTextToNumber()
    Dim Cell As Range
    For Each Cell In Range("A1:A10")
        Cell.Value = Cell.Value * 1
        Cell.NumberFormat = "0.00"
    Next Cell
End Sub