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

[shmrdn]

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

baj 04-2017 -Acc#003 - Copy.rar

[عبدالسلام ابوالعوافي]

جرب الملف المرفق 

الطريقة هي ان تحدد الخلايا التي تحتوي علي ارقام وتريد اجراء عمليات حسابية عليها ثم شغل الكود المرفق 

التجربة في الملف وقارن بين الشيتين

Sub test()
Dim cll As Range
Dim i As String
Dim ii As Double

    For Each cll In Selection
        If Len(cll) > 1 Then
        i = Len(cll)
        ii = CDbl(Right(Left(cll, i - 1), i - 2))
        cll = ii
        End If
    Next
End Sub

 

baj 04-2017 -Acc#003 - Copy 2.rar

[mohamed shehab]

جرب معادلة اسمها TRIM

تم تعديل يوليو 22, 2017 بواسطه mohamed shehab