اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

أساتذتي الكرام ..هل يمكن إيجاد الحل المناسب بالكود المناسب لترحيل الأعداد من التاكست بوكس أو استدعائها إلى التاكست بوكس..تكتب تلقائيا بهذا النمط من الكتابة :

*  الرقم 1 مثلاً.. يظهر تلقائيا 01.00

* الرقم 10 مثلاً.. يظهر تلقائيا 10.00

* الرقم 100 مثلاً.. يظهر تلقائيا 100.00

* الرقم 16.5 مثلاً.. يظهر تلقائيا 16.50

بمعنى إدخال أو استدعاء الأعداد يكون بصفة عامة بهذه الصيغة (00.00)

بارك الله فيكم و جزاكم الله خيرا مقدّمًا ..

قام بنشر (معدل)

ارفق ملف أخي الفاضل عبد العزيز البسكري

بارك الله فيك أستاذي الغالي على نية المساعدة .. جزاك الله خيرًا و زادها بميزان حسناتك ..

لاحظ أستاذي الفاضل انّ التاكست بوكس المعنيّة بسؤالي هي التاكست بوكس ذات الأرقام الآتية :9.10.15.16.19.20.23.24.27.28.31.32.35.36.39.40

أما مجموعة التاكست بوكس الأخرى غير معنية بسؤالي لأني أستدعي لها النتائج من الشيت..تفضّل الملف سيّدي

المشروع.rar

تم تعديل بواسطه عبد العزيز البسكري
قام بنشر

جرب الكود التالي .. غير بما يناسبك

جرب الأول على تكست بوكس واحد عشان تشوف إذا كان دا المطلوب أولا

Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
    TextBox1 = Format(TextBox1.Text, "0.00")
End Sub

جرب ملف جديد وضع فيه عدد 2 تكست بوكس  وضع الكود

واكتب رقم في التكست بوكس 1 واضغط Tab من لوحة المفاتيح عشان تخرج من التكست بوكس وشوف شكل التنسيق

قام بنشر

جربت أستاذي الفاضل الكود .. إليك سيّدي الملاحظات في الصور المرفقة أدناه :

* الصورة الأولى عند بداية الادخال ..فور الادخال

* الصورة الثانية لما أُدخل في الشيت

* الصورة الثالثة عند إستعراض النتيجة في الفورم

 

للعلم أستاذي الكريم أنّ الحسابات الموجودة داخل الشيت هي الصحيحة .

المشروع 2.rar

قام بنشر (معدل)

ارفق الملف بعدما أدخلت التعديلات عليه للإطلاع عليه

تفضّل سيّدي ..

المشروع.rar

تم تعديل بواسطه عبد العزيز البسكري
قام بنشر

جربت الملف وأعطاني المعدل بشكل مضبوط على الشيت وعلى الفورم ..نفس الرقم على خلاف الصورة التي أرفقتها !! !! :wallbash:

لاحظ لو سمحت أستاذي الفاضل الملاحظات داخل الشيت ..ألف شكر وبارك الله فيك على المساعدة

المشروع.rar

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information