معادلة التفقيط في الإكسل .....تحويل الارقام الى كتابة

إدارة المدونة " ترحب بكل ضيوفها وزوارها وأعضائها وترى ضرورة التفاعل بالرأي والمشاركة الإيجابية الهادفة " نرتقي معاً " من أجل ...خدمة الإنسانية .. ...بخیر هاتنا مێڤانێت خوشتڤی دكەم هیڤیدكەم دخزمەت دابم....bxîr hatna mêvanêt xuştvî dkem hîvîdkem dxzmet dabm.....I welcome all the distinguished guests, I should serve you.....

كلمة المدونة

معادلة التفقيط في الإكسل .....تحويل الارقام الى كتابة

9/29/2011 11:39:00 ص

شارك - اطبع - ارسل لصديق |

طريقة التنصيب

بسم الله الرحمن الرحيم
والصلاة والسلام على أشرف المرسلين سيدنا محمد وعلى آله وأصحابه أجمعين

التفقيط فى Excel.

لا توجد دالة محدددة فى Excel لعمل تفقيط

ولكن .......

يمكن عمل كود لدالة موجودة بالفعل وتم تصميمها من قبل باستخدام vb.
وإليك الدالة والطريقة

الدالة موجودة فى المرفقات بعد فك الضغط ستجد ملف اسمه tafkeet.bas. - وإحقاقاً للحق فهذه الدالة من تصميم أخ فاضل يدعى أبو هانى -

أما كيفية تنفيذها فبرجاء القراءة والتطبيق بروية وفقاً للخطوات التالية

#1 افتح برنامج Excel ثم اضغط على Alt+f11 لتظهر النافذة التالية

#2 ثم تختار import file.
وتحدد ملف tafkeet.bas الذى انزلته من المرفقات

#3 والآن نعود إلى صفحة Excel.
ضع قيمة فى الخلية f10 وقف فى خلية أخرى وانسخ المعادلة التالية
=NoToTxt(F10;"جنيه";"قرش")
(يفضل نسخها كما هى) وإن لم تستطع قراءة المعادلة فهى موجودة فى الصورة التالية فى شريط الصيغة

فتجد أنه تم تحويل الأرقام فى الخلية f10 إلى نص كما فى الصورة التالية

#4 * ملاحظة يمكن التعديل فى المعادلة لتصبح ريال وفلس بدل جنيه وقرش
وكذلك يمكنك بالطبع تغيير اسم الخلية f10 إلى أى خلية تريدها

أرجو أن أكون وفقت فى الشرح
وفقنا الله وإياكم إلى ما يحب ويرضى

طريقة استخدام دالة التفقيط

أولا نقوم بفتح برنامج الفيجول بيسيك من الاكسيل كما يلي