تحميل كتاب تعلم التفقيط في اكسل مجموعه مؤلفين PDF

تحميل كتاب تعلم التفقيط في اكسل pdf اعزائي واحبابي واصدقائي الطلاب هذا درس مهم ومفيد لكل طالب اراد تعلم برنامج اكسل . الدرس هو التفقيط : التفقيط: تحويل الأعداد إلى كلمات التفقيط هو تحويل الأرقام إلى كلمات، مثلا 145 تصبح مئة وخمسة وأربعون. وسمي تفقيطا، لأنه كان يقال، خمس وأربعون دينارا فقط. يحتاج إليه في برمجيات المحاسبة، وفي قراءة النصوص، وغيرها، والحاجة إلى برمجية مفتوحة المصدر في هذا المجال مهم جدا، لاسيما مكتبات تدمج في تطبيقات أخرى. وهو مجاني للجميع يمكنكم تحميله من الرابط ولا تنسوني من صالح دعائكم وهو بالصور سلس وسهل وبسيط يمكنك مشاركته للفائدة والسلام عليكم ورحمة الله تعالى وبركاته اخوكم المهندس احمد حجي مللي تأليف: المهندس احمد حجي مللي تعلم التفقيط في اكسل 2010 اعداد المهندس أحمد حجي مللي هذا العمل مجاني للجميع وحقوق الاستخدام والنشر لكل مسلم رجاء دعوة صالحة بظهر الغيب 1435 Private Function Value(ByVal Num As String) As String If Num = "0" Then Value = "" GoTo finish End If If Num = "1" Then Value = "واحد " GoTo finish End If If Num = "2" Then Value = "اثنان " GoTo finish End If If Num = "3" Then Value = "ثلاثة " GoTo finish End If If Num = "4" Then Value = "اربعة " GoTo finish End If If Num = "5" Then Value = "خمسة " GoTo finish End If If Num = "6" Then Value = "ستة " GoTo finish End If If Num = "7" Then Value = "سبعة " GoTo finish End If If Num = "8" Then Value = "ثمانية " GoTo finish End If If Num = "9" Then Value = "تسعة " GoTo finish End If finish: End Function Private Function Value2(ByVal Num As String) As String Dim num1 As String Dim num2 As String Dim ben As String num2 = Left(Num, 1) num1 = Right(Num, 1) If num2 = "1" Then Value2 = "عشر " GoTo finish End If If num2 = "2" Then Value2 = "عشرون " GoTo finish .