Ali Mohamed Ali

اهلا بك اخ كريم فى المنتدى -كلمة السر موجودة بالمشاركة الأولى الرقم السرى للدخول الى البرنامج هو 123

أحسنت استاذ ابراهيم جزاك الله كل خير -كود ممتاز

ممتاز دالة رائعة جعله الله فى ميزان حسناتك

بارك الله فيكم جميعا كود ممتاز استاذى الكريم

وعليكم السلام ولكن كان عليك رفع الملف نفسه تجنبا لإهدار الوقت ولكن تفضل هذه الدالة المعرفة لعمل اللازم-لابد من وضعها فى مديول جديد Function Reversestr(str As String) As String Reversestr = StrReverse(Trim(str)) End Function واذا كان مثلا هذا التاريخ موجود بالخلية B2 فعليك كتابة هذه المعادلة فى خلية أخرى =Reversestr(B2)

تفضل اخى الكريم عليك استكمال باقى الشهور كما بالشهر الأول والثانى وكذلك مصروفات السنة ككل على نفس المعادلات بارك الله فيك ايراد ومصروف.xlsx

وعليكم السلام بارك الله فيك وجعله فى ميزان حسناتك

وعليكم السلام تفضل لك ما طلبت فورم بحث .xlsm

يمكن يكون نسخة الإكسيل لديك اعلى من النسخة المرسل اليها الملف بارك الله فيك

لو واجهتك اى مشكلة عليك برفع الملف مرة اخرى وتوضيح المشكلة لحلها بارك الله فيك

يمكنك الإستعانة بهذا الرابط https://www.ablebits.com/office-addins-blog/2014/03/06/transpose-excel-rows-columns/

تم عمل هذا فى العمود X من الصفحة الثانية AG__.xlsx

وعليكم السلام ضع هذا الكود فى حدث الصفحة Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Not Application.Intersect(Target, Range("B7:B100")) Is Nothing Then UserForm1.Show End If End Sub

تفضل اخى الكريم -هذا الكود للتعطيل Sub Disable_Keys() Dim StartKeyCombination As Variant Dim KeysArray As Variant Dim Key As Variant Dim I As Long On Error Resume Next 'Shift key = "+" (plus sign) 'Ctrl key = "^" (caret) 'Alt key = "%" (percent sign 'We fill the array with this keys and the key combinations 'Shift-Ctrl, Shift- Alt, Ctrl-Alt, Shift-Ctrl-Alt For Each StartKeyCombination In Array("+", "^", "%", "+^", "+%", "^%", "+^%") KeysArray = Array("{BS}", "{BREAK}", "{CAPSLOCK}", "{CLEAR}", "{DEL}", _ "{DOWN}", "{END}", "{ENTER}", "~", "{ESC}", "{HELP}", "{HOME}", _ "{INSERT}", "{LEFT}", "{NUMLOCK}", "{PGDN}", "{PGUP}", _ "{RETURN}", "{RIGHT}", "{SCROLLLOCK}", "{TAB}", "{UP}") 'Disable the StartKeyCombination key(s) with every key in the KeysArray For Each Key In KeysArray Application.OnKey StartKeyCombination & Key, "" Next Key 'Disable the StartKeyCombination key(s) with every other key For I = 0 To 255 Application.OnKey StartKeyCombination & Chr$(I), "" Next I 'Disable the F1 - F15 keys in combination with the Shift, Ctrl or Alt key For I = 1 To 15 Application.OnKey StartKeyCombination & "{F" & I & "}", "" Next I Next StartKeyCombination 'Disable the F1 - F15 keys For I = 1 To 15 Application.OnKey "{F" & I & "}", "" Next I 'Disable the PGDN and PGUP keys Application.OnKey "{PGDN}", "" Application.OnKey "{PGUP}", "" End Sub وهذا لإرجاع الحال الى السابق والطبيعى اى لعمل الإختصارات مرة أخرى Sub Enable_Keys() Dim StartKeyCombination As Variant Dim KeysArray As Variant Dim Key As Variant Dim I As Long On Error Resume Next 'Shift key = "+" (plus sign) 'Ctrl key = "^" (caret) 'Alt key = "%" (percent sign 'We fill the array with this keys and the key combinations 'Shift-Ctrl, Shift- Alt, Ctrl-Alt, Shift-Ctrl-Alt For Each StartKeyCombination In Array("+", "^", "%", "+^", "+%", "^%", "+^%") KeysArray = Array("{BS}", "{BREAK}", "{CAPSLOCK}", "{CLEAR}", "{DEL}", _ "{DOWN}", "{END}", "{ENTER}", "~", "{ESC}", "{HELP}", "{HOME}", _ "{INSERT}", "{LEFT}", "{NUMLOCK}", "{PGDN}", "{PGUP}", _ "{RETURN}", "{RIGHT}", "{SCROLLLOCK}", "{TAB}", "{UP}") 'Enable the StartKeyCombination key(s) with every key in the KeysArray For Each Key In KeysArray Application.OnKey StartKeyCombination & Key Next Key 'Enable the StartKeyCombination key(s) with every other key For I = 0 To 255 Application.OnKey StartKeyCombination & Chr$(I) Next I 'Enable the F1 - F15 keys in combination with the Shift, Ctrl or Alt key For I = 1 To 15 Application.OnKey StartKeyCombination & "{F" & I & "}" Next I Next StartKeyCombination 'Enable the F1 - F15 keys For I = 1 To 15 Application.OnKey "{F" & I & "}" Next I 'Enable the PGDN and PGUP keys Application.OnKey "{PGDN}" Application.OnKey "{PGUP}" End Sub أتمنى الإفادة بارك الله فيك

جرب هذا الملف لعله يفيدك وهناك ايضا رابط هنا قد ناقش هذه الجزئية يمكنك الإطلاع عليه https://www.officena.net/ib/topic/78197-ضريبة-كسب-العمل-الجديده-بالاكسيل/ أحتساب ضرائب الدخل بعد تحديث يوليو - 2018.xlsm

وعليكم السلام استاذ أحمد غانم وشاكر حضرتك على المرور العطر الذى شرفنى

لو الخطأ مع معادلتى انا فلابد من الضغط على Ctrl+Shift+Enter وليس Enter فقط كباقى المعادلات لكى تعمل المعادلة بكل دقة لأنها معادلة مصفوفة وليست معادلة عادية بارك الله فيك

تفضل Book1.xlsx

دائما وابدا يجب رفع ملف للعمل عليه تجنبا لإهدار الوقت بارك الله فيك

أحسنت استاذ شريف معادلة رائعة ولإثراء الموضوع هذا حل اخر بمعادلات المصفوفة دالة تحسب المبالغ بدلالة الشهر والسنة وذلك من التاريخ 1.xlsx

بعد اذن الأستاذ شريف ولإثراء الموضوع هذه معادلة مجموع الكميات السالبة =-SUMIF($C$2:$C$9956,"<0") وهذه معادلة الكميات الموجبة =SUMIF($C$2:$C$9956,">0") بارك الله فيكم جميعا

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

بارك الله فيكم جميعا وشاكر على مروركم المشرف العطر

السلام عليكم أساتذتى واخوانى الكرام أقدم لكم هذا البرنامج لكى تتمكن أطفالنا الكرام من حفظ جدول الضرب بطريقة سهلة ومفيدة الطريقة مناسبة جميع المستويات . الطريقة سريعة جداً وبسيطة . الطريقة مثل لعبة من سيربح المليون . يمكن للجميع استخدام هذه الطريقة . طريقة حفظ الجدول علي شكل برنامج . البرنامج متوفر لكم مجاني ومتاح التحميل للجميع . حجم برنامج تحفيظ جدول الضرب 2 ميجا تقريباً . اللعبة 3 مستويات . كل مستوي علي حسب سن ومستوي الطالب . كل مرة يجاوب فيها الطفل يأخذ درجة أعلي . كل سؤال له 4 اختيارات . يمكن كتابة اسم الطفل لكي يظهر الشيك باسمه كما ان هناك فيديو لشرح البرنامج قبل البدء فى تشغيله https://www.youtube.com/watch?v=i1fMsbU-B-8 وهذا هو البرنامج جدول_الضرب_علي_شكل_لعبة_من_سيربح_المليون_لجميع_الصفوف_جدول_الضرب_للاطفال.rar

السلام عليكم أساتذتى واخوانى الكرام أقدم لكم برنامج شئون العاملين فى التربية والتعليم البرنامج من إعداد الأستاذ / أحمد عريضه البرنامج مجاني ومتاح لجميع المدارس العمل عليه . يستخرج صحيفة احوال لكل معلم . صفحة الطباعة ( صحيفة الاحوال ) منسقة ومعدلة علي الطباعة . لا يوجد علامات مائية . لا يوجد اسماء بصحيفة الاحوال خارجية . البرنامج يستخرج تاريخ الميلاد من الرقم القومي . البرنامج يستخرج نوع المعلم أو المعلمة من الرقم القومي . يوجد صفحة ادخال بيانات من خلالها يمكن ادخال بيانات لجميع العاملين . البرنامج يحمل أكثر من 1200 اسم . البرنامج يعمل علي اكسل ويفضل اكسل 2010 فيما أعلي . يمكن اضافة شعار للمؤسسة أو المدرسة . يمكن كتابة اسم المديرية والإدارة والمدرسة والتوجيه باللغتين العربية والإنجليزية . الصحيفة تحمل بيانات أكثر من صحيفة الأحوال الواردة من الوزارة . يمكن التعديل علي أي بيانات من صفحة التعديل وتظهر فوراً في صفحة الطباعة . وهذا فيديو لشرح البرنامج والعمل عليه https://www.youtube.com/watch?v=ThdIU4KQh7Q وهذا هو البرنامج برنامج شئون العاملين بالتربية والتعليم مجانا 2019 excel تحميل برنامج شئون العاملين مفتوح المصدر.xlsx