اذهب الي المحتوي
أوفيسنا

الزير

03 عضو مميز
  • Posts

    105
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو الزير

  1. السلام عليكم ورحمة الله وبركاته الاساتذة الكرام هل ممكن تساعدونني في اظهار اشعار في حال تحقق شرط ما يظهر هذا الاشعار جنب الساعة واللغة كما في المرفق اتمنى ان اجد الحل لديكم فانا في امس الحاجة اليه لإنهاء فكرة برنامج اعمل عليه وشكراً لكم مقدماً طبعاً سيكون هذا الشرط في حدث الوقت للفورم والذي يتم تحديثه كل ثانية ففي حال تحقق الشرط يتم اشعاري برسالة اسفل الشاشة جنب الساعة
  2. للرفع كنت قد أهملت الموضوع لانه لم يتم التطرق له في عملي لكن من يومين طلب مني تقرير عن الاجازات خلال فترة معينة ولتكن (اسبوع) المطلوب ان يتم إستخراج أخر إجازة حصل عليها الموظف مثلا الموظف سين حصل على 3 إجازات بتاريخ 01/04/2015 06/05/2015 03/07/2015 لو قمت بالبحث في الفترة من 01/07/2015 الى 07/07/2015 تظهر إجازة للموظف سين بتاريخ 03/07/2015 ومقابل هذه الإجازة يظهر التاريخ 06/05/2015 كتاريخ لأخر إجاززة حصل عليها اتمنى أن أكون وضحت المطلوب بانتظار مساهماتكم وكل عام وانتم بخير
  3. شكرا جزيلا استاذنا الفاضل ابوخليل على الإجابة وسأحاول التطبيق
  4. بارك الله فيك استاذ ابو خليل قد أكون أثقلت عليك وفكرة المعيار ممتازة لكني اريد تطبيقها على حقول التقرير وليس الإستعلام وشكراً على تجاوبك وبإنتظار أفكارك الجميلة في التقرير
  5. شكراً لك استاذ ابو خليل ولكن طلبي أن تكون السنوات هس الصف وتفاصيل السبب هو العمود فهل هذا ممكن وذلك كوني أريد أن أحصل على أجمالي كل سنة على حده من كل سبب وشكراً على تجاوبك ابووائل
  6. السلام عليكم ورحمة الله وبركاته قمت بعمل إستعلام جدولي لإستخراج البيانات (الذين لم يعد لهم سجل في الشركة) وتفاصيل سبب عدم عملهم (مثل - تقاعد - وفاة - نقل إلخ) الإستعلام يعمل حسب السنوات (يعني بيعطيني عدد الموظفين الذين تركوا العمل في كل سنة حسب التفاصيل السابقة) الى هنا ان شاء الله الأمور واضحة. قمت بجعل هذا الاستعلام مصدر لتقرير سيم طباعته مشكلتي ان كل سنة جديد لا بد من أقوم بتعديل التقرير وإضافة السنة الجديدة يدويا ولو صادف إن أحدى السنوات ليس لها بيانات يحدث خطاء فهل هناك حل لجعل التقرير يتناقص بشكل سنوي يعني لدي في التقرير المرفق سنة 2006 الى 2015 اريده مع إضافة بيانات في 2016 ان يصبح من 2007 الى 2016 وفي 2017 يصبح 2008 الى 2017 وهكذا السبب في ذلك إن البرنامج أعطيه لعدد من الفروع وبعضها بعيد كما إني قد إجعل صيغة الملف MDE ولا يمكن التعديل على التقارير وشكراً قاعدة البيانات1.zip
  7. بارك الله فيك استاذ ابوخليل على المعلومة الصحيحة تمت الإجابة
  8. عند فرز الاستعلام تصاعدي فان الترتيب يصبح 1 ثم 10 ثم 11 الى 19 ثم 2 ثم 20 ثم 21 وهكذا المطلوب ان يتم الفرز هكذا 1 - 2 - 3 -4 -5 -6 -7 - 8 -9 10 وهكذا
  9. شكرا استاذ ابوخليل على الإجابة بالنسبة للطلب الثاني فتحت موضوع جديد
  10. لماذا لما اطبع تقرير وفيه خط تحت الكلمة لاينطبع الخط مع انه موجود في معاينة الطباعة وشكرا ابووائل
  11. السلام عليكم ورحمة الله وبركاته الأساتذة الكرام طلبي كيف اعرف عدد النماذج النشطة ( ساستخدمه في كود اغلاق البرنامج بعد مدة من عدم الاستخدام) ولي سؤال آخر ليش لما اطبع تقرير وفيه خط تحت الكلمة لاينطبع الخط مع انه موجود في معاينة الطباعة وشكرا ابووائل
  12. للرفع علماً بأن الاستاذة زهرة في الفريق العربي للبرمجة زودتني بهذا الحل لكن مشكلته في أخر إجازة غير صحيح ارجو ان اجد لديكم الحل za-UPالزير.rar
  13. السلام عليكم في الملف المرفق جدولين وتقرير الجدول الاول خاص بالبيانات الجدول الثاني خاص بتسجيل الاجازات للموظفين والعامل المشترك هو الرقم (ID) التقرير لعرض إجازات الموظفين بين تاريخين (ممكن تكون خلال اسبوع - يومين - شهر وهكذا ) تمهيداً لطباعتها المطلوب في التقرير 1. يتم إستخراج أخر إجازة للموظف 2. إستخراج المجموع الكلي لعدد أيام (مدة الاجازة) الخاصة بالموظف خلال عام حتى الشهر الذي نحن فيه (مثلاً) من مارس 2013 وحتى مارس 2014 ======================================== كلي أمل ان اجد الحل لديكم وشكراً مقدماً للجميع ابووائل الزير.rar
  14. ضع الملف الذي به الكود لفهم الية الكود
  15. لدي نموذجين الاول رئيسي للبيانات العامة والأخر للإجازات ويتم فتح النموذج الثاني بزر موجود في النموذج الأول لكن المشكلة ان يوجد لدي تشابه في رقم الموظفين واختلاف في القسم فهل ممكن عند ضغط زر فتح نموذج الاجازات ان يتم تصفية بيانات الموظف حسب الرقم والقسم وان لا يظهر الموظفين المشتركين في نفس الرقم ارجو ان اجد لديكم الحل
  16. جميل جداً استاذ رجب اضن هذا ما يقصده السائل واقترح تعديل كود زر الترحيل لصبح Private Sub CommandButton1_Click() LR1 = [A1000].End(xlUp).Row + 1 Cells(LR1, 1) = ComboBox1 Cells(LR1, 2) = Me.TextBox1 Cells(LR1, 3) = Me.TextBox2 TextBox1 = "" TextBox2 = "" ComboBox1 = "" ComboBox1.SetFocus End Sub حتى يتم تفريغ الفورم
  17. ابارك للاساتذة الكرام عبدالله المجرب جمال دغيدي احمد فضيلة هذا التقدير والترقية المستحقة
  18. السلام عليكم ورحمة الله وبركاته اخواني الكرام اتمنى ان اجد لديكم الرد حول هل ممكن ان اجعل البرنامج عند فتحه على فورم معين تكون اللغة العربية هي لغة الكتابة مع العلم انه حتى لوكانت اللغة العربية هي لغة الكتابة فانه عند الفتح تتحول الى اللغة الانجليزية مع جزيل الشكر والامتنان ابووائل
  19. بارك الله فيكم اساتذتنا الكرام حلول متنوعة وممتازة
  20. سوال هل يمكن تطبيق هذا الكود دون الحاجة الى ضبط رقم سري واسم مستخدم
  21. السلام عليكم استاذنا الكريم لي طلب من حضرتك ان يكون اتساع أعمدة الليست بوكس مرن ولا تظهر اشرطة التمرير بل تظهر البيانات كاملة كتابة ترويسات للاعمدة
×
×
  • اضف...

Important Information