اذهب الي المحتوي
بحث مخصص من جوجل فى أوفيسنا
Custom Search

هذه الصفحة تحدث تلقائياً     

  1. الساعة الأخيرة
  2. البرنامج يعمل على office2010 ولاكن لابد من تمكين وحدات الماكرو في الأوفيس ( الأكسس )
  3. أستاذ أحمد شكرا جزيلا لحضرتك طريقة جميلة ولكن للأسف ليس حل جذري بسبب كثرة الأسماء فوق ال 800 اسم لأن هاسجل الأسامي نسخ ولصق شكرا تواصل حضرتك معي
  4. بعد إذن الأستاذ عماد يمكنك التغلب على هذه المشكلة بإضافة العلامة العشرية بعدنهاية كل كلمة من الاسم بدلاً من المسافة طبعًا هذا في اسم ورقة العمل وكذلك أسماء العملاء الموجودين بورقة Principal
  5. أخى العزيز بارك الله فيك البرنامج لا يفتح معى على Office 2010
  6. تحياتي اخي العزيز معلومات قيمة وقد شجعتني للدخول فيها بإذن الله .. تحياتي لك وشكرا جزيلاً
  7. بعد لم يكتمل الشرح ماذا تريد ان تجمع بذلك الشروط هل تريد ان تجمع وقت العمل او اي حقل بالضبط
  8. وعليكم السلام 🙂 . 1. غائب<> StatusTybe ، الظاهر اني قلبتها 🙂 5. مجموع دقائق التأخر ، من المشاركة السابقة ، 2. تحويل دقائق التأخر الى دقائق:ساعات:يوم 1. =Sum(IIf([StatusTybe]<>3,1,0)) 2. =Minutes2DHM([SumTimeDelay],DateDiff("h",[Forms]![EmployeeMovement_F]![OutTimE],[Forms]![EmployeeMovement_F]![InTimE])) اي ننادي الوحدة النمطية Minutes2DHM ونرسل لها مجموع الدقائق SumTimeDelay والتي نريد تحويلها الى دقائق:ساعات:يوم وكذلك نرسل عدد ساعات الدوام كل يوم وللتوضيح، مناداة الوحدة النمطية، حسب الارقام الحمراء لكل حقل في الصورة =Minutes2DHM(5,DateDiff("h",4,3)) . والوحدة النمطية: Public Function Minutes2DHM(minutes As Long, Working_hrs As Long) As String Dim dd As Long, hh As Integer, mm As Integer, Working_Mints As Long minutes = Abs(minutes) Working_hrs = Abs(Working_hrs) Working_Mints = Working_hrs * 60 dd = minutes \ Working_Mints minutes = minutes - dd * Working_Mints hh = minutes \ 60 mm = minutes Mod 60 Minutes2DHM = Format(dd, "000") & ":" & Format(hh, "00") & ":" & Format(mm, "00") End Function . وطبعا ممكن تطبيق هذا على بقية الحقول 🙂 جعفر 990.Employee 04 .accdb.zip
  9. وعليكم السلام بارك الله فيك واشكرك بارك الله بك ووسع في ارزاقك وجبر الله بخاطرك بالدنيا والاخره 1- اريد ان احذف الورقة بعنوان (مثال 2) 2- عندما افتح مثلا ورقة3 واسجل بالفورم للاسف يتم الحفظ بالورقة المعنونة ب (مثال1) اي ان المشكلة عدم توافق بين رقم الصفحة مع الفورم
  10. أهلاً بالأستاذ @Shivan Rekany اسم لنموذج EmployeeMovement_F يوجد أربعة حقول اسفل الفورم الفرعي المطلوب تجميع عدد السجلات بشرط أن نص حقل Status يساوي كالتالي: SumD = دوام كامل +دوام جزئي SumK = غائب SumS = أستئذان SumG = أجازة تفضل المرفق: Employee 12 .rar
  11. تم التعديل حسب المطلوب فورم اد5555خال و تعديل مرن (4).xls
  12. Today
  13. محمد البشير خالد

    برنامج العطاء للعقارات

    السلام عليكم ورحمة الله اولا اشكرك علي المجهود الجميل منك ولكن البرنامج م يفتح معي علما انا استخدم اكسس 2010 ولك مني جزيل الشكر والتقدير
  14. أستاذ عماد شكرا جزيلا لحضرتك الطريقة ممتازة ، المتبقي خطوة واحدة وتنفيذها بخانة " تاريخ آخر السداد " مثل ما تفضلت وعملتها بالخانات الأخري شكرا تواصل حضرتك معي لكن المشكلة الكبيرة ان عند كتابة الاسم ثنائي أو ثلاثي .. المعادلة بتكون خطأ .. لماذا ؟؟ 1.xlsm
  15. husseinharby

    اظهار حقل في التقرير بشرط

    شكرا استاذ شفان هذا هو المطلوب
  16. Shivan Rekany

    اظهار حقل في التقرير بشرط

    اتفضل استخدم هذا Private Sub PageHeaderSection_Print(Cancel As Integer, PrintCount As Integer) If Me.الكود = 5 Then Me.Devirse.Visible = False Me.Label40.Visible = False End If End Sub Database1 (2).rar
  17. الأفضل لك أنك تستخم فلتر لأنك عندك اسماء عملاء كتير حدد الصف الاول فى شيت يومية ومن data اختار فلتر وعند اسم العميل دوس على الفلتر وحدد اسم العميل اللى عاوزه هتجيلك كل البيانات الخاصة بهذا العميل
  18. husseinharby

    اظهار حقل في التقرير بشرط

    شكرا استاذ جعفر ربما اكون اسأت عرض المشكلة يتم عرض بيانات الاستعلام في تقرير باسم balance_for هل يمكن تطبيق المطلوب في التقرير بدلا من الاستعلام
  19. وعليكم السلام 🙂 لا يمكن التحكم بالاستعلام بهذه الطريقة ، وانما يمكن عمل هذا عن طريق اعادة عمله عن طريق الكود !! ولكن ، اين ستعرض بيانات الاستعلام ، سواء رقم الكود = 5 او لا ، في نموذج ؟ اذن يمكن ان نجعل هذا الحقل مخفي في النموذج ، في حال ان الكود = 5 كان معيار الاستعلام 🙂 جعفر
  20. السلام عليكم أخواني الكرام ممكن كود تجمع عدد سجلات في الفورم الفرعي بشرط حقل يحتوي على نص معين؟
  21. Emad Sabry

    تكرار دالة

    انت سالت ان عندك جهاز تانى وعملت & ومنفعش بدل ماتعمل & هتستخدم and وهتكتب سريال الجهاز الاول وسريال الجهاز التانى ودا موجود فى الموضوع اللى بعتهولك يعنى ضيف قبل كلمة then And Hex(CreateObject("Scripting.FileSystemObject").Drives.Item("C:").SerialNumber) <> "سريل الجهاز الثاني"
  22. السلام عليكم في تقرير باسم balance_for اريد ان يظهر حقل باسم (متنوع) عندما يكون رقم الكود 5 غير ذلك لا اريد ان يظهر الحقل Database1.rar
  23. تم التعديل عند كتابة الكمية لن يختفى الاسم البرنامج وما اريد 1.xlsm
  24. Ahmed Saad 2017

    تعديل كود Combo Box

    الاستاذ علي المحترم تم تعديل الشيت وتم تشغيل اليست بوكس بنجاح هل من الممكن التعامل مع شيت الاكسيل من تعديل او اضافة في حالة ان اليوزر فورم مفتوحه
  25. أخي عماد ما فهمت عليك ، ممكن تعملها في الشيت المرفق وشكرا علي تواصلك 1.xlsm
  1. Load more activity


×