اتمنى ان تجدى ما تريديه فى هذا الرابط : وهو برنامج حضور وانصراف للطلاب والطالبات بالأكسيس :
https://www.officena.net/ib/topic/84643-برنامج-الحضور-والإنصراف-والمخالفات-للطلاب/
ولكم جزيل الشكر
السلام عليكم اساتذتى واخوانى -أقدم لكم هذا البرنامج وهو من برمجة وتصميم استاذنا الكبير / سامى محمد على
وصور وشرح البرنامج داخل ملف الإكسيل
وهناك نموذجان للبرنامج أحدهما يصلح لمدارس البنين والأخر لمدارس البنات
واسم المستخدم للبرنامج : admin
وكلمة السر : 123
يا رب ينال اعجابكم -جزاكم الله كل خير
BOY.rar
GIRL.rar
صور وشرح البرنامج.docx
تفضل اخى الكريم-تم التعديل على المعادلة ليناسب ملفك
والأن ليس هناك شرط ولا مكان لكلمة False فى المعادلة,فأخر شرط فى المعادلة هو أعلى من أو يساوى الرقم 31
فبالتالى اى رقم اعلى من31 له ناتج فى المعادلة
بارك الله فيكم
معادلة IF-1.xlsx
أخى الكريم لان المعادلة لم تفلح بهذا
الجزء الأول من المعادلة هو البيانات المطلوب من صفحة Item من نفس العمود
أما باقى اجزاء المعادلة فهى الشرطين الواجب توافرهما عند جلب البيانات من صفحة Item وهما العميل والرقم
بارك الله فيك
وعليك السلام اخى الكريم حاول مع هذه المواقع للتحويل بدون برامج -بارك الله فيك
https://smallpdf.com/ar/pdf-to-excel
https://www.freepdfconvert.com/ar/pdf-excelhttps://smallpdf.com/ar/pdf-to-excel
وعليكم السلام اخى الكريم-من الأفضل ارسال ملف وشرح فيه ما تريد-حتى تتمكن الأساتذة من مساعدتك
وجدت هذان الملفان لدى-اختر منهم ما يناسبك
اقساط.xlsx
كود ترحيل لمبيعات الأقساط.xlsm
وهذا هو الكود المستخدم فى حدث الصفحة بالملف :
Private Sub Workbook_Open()
If Date >= DateValue("15/07/2018") Or Sheets("sheet1").Range("a1") = 1 Then
Sheets("sheet1").Range("a1") = 1
MsgBox "Expire ÅäÊåÊ ÕáÇÍíÉ ÇáãáÝ"
ThisWorkbook.Save
Application.Quit
End If
End Sub
وعليكم السلام اخى الكريم
اهلا بك اخ كريم فى منتدانا
قم برفع ملف به ما تريد وبعض النتائج المتوقعة وان شاء الله ستلقى المساعدة من الأساتذة والخبراء
بارك الله فيك