مشكلة في القسمة في الـvba

[ابولمى]

اخواني احاول قسمة هذا الرقم  

837987

على هذا الرقم

11773501

وعند تنفيذ الكود يعطيني نتيجه خاطئه!!كما يظهر لي في نافذة اللوكالس    7.11756851254355E-02 

وهذا هو الناتج الصحيح 

0.071176

اتمنى مساعدتي في حل هذه المشكله

 

تم تعديل ديسمبر 28, 2015 بواسطه مستخدم جديد9

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

أخي الكريم

يرجى تغيير الاسم إلى اسم لائق ..

بالنسبة لسؤالك ..الناتج صحيح لكن المشكلة أن الناتج ظهر بشكل غير متوقع لك ..لذا لحل المشكلة يتم تنسيق الناتج بهذا الشكل

Sub Test()
    Dim X
    X = Format(837987 / 11773501, "#,##0.000000")
    MsgBox X
End Sub

يمكن التحكم في عدد الأرقام على يمين العلام العشرية كما تشاء

أرجو أن يكون المطلوب

تقبل تحياتي

[ابولمى]

4 ساعات مضت, ياسر خليل أبو البراء said:

أخي الكريم

يرجى تغيير الاسم إلى اسم لائق ..

بالنسبة لسؤالك ..الناتج صحيح لكن المشكلة أن الناتج ظهر بشكل غير متوقع لك ..لذا لحل المشكلة يتم تنسيق الناتج بهذا الشكل

Sub Test()
    Dim X
    X = Format(837987 / 11773501, "#,##0.000000")
    MsgBox X
End Sub

يمكن التحكم في عدد الأرقام على يمين العلام العشرية كما تشاء

أرجو أن يكون المطلوب

تقبل تحياتي

اخي شكرا لتجاوبك ..لكن انا اقصد الناتج الظاهر في locals window 

وتم تغيير اسم المستخدم كما طلبت اخي العزيز :)

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

أخي الكريم أبو لمى

لا أدرى ما السبب في ظهور الناتج بهذا الشكل ولكن بعد البحث وجدت أن الناتج يكون بشكل صحيح ، ولكن يظهر لنا بهذا الشكل أو التنسيق ..وللحصول على النتيجة كما نريد نقوم بتغيير التنسيق