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

ابو حبيبة وحنين

عضو جديد 01
  • Posts

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

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

مشاركات المكتوبه بواسطه ابو حبيبة وحنين

  1. ومحبة مني إليك شرح كود الأستاذ الكبير والأخ الغالي مختار (اللي مش بيرد على تليفونات)

    Private Sub Workbook_Open()
    'يقوم الكود بمسح محتويات الخلايا في كافة أوراق العمل بعد تاريخ محدد
    '------------------------------------------------------------------
    'الإعلان عن المتغيرات
        Dim SH As Worksheet
    'الإعلان عن ثابت من النوع تاريخ ليمثل التاريخ المراد العمل عليه في الكود
        Const MyDate = #1/30/2015#
    'إلغاء خاصية اهتزاز الشاشة
        Application.ScreenUpdating = False
    'إلغاء خاصية رسائل التنبيه
        Application.DisplayAlerts = False
    'إذا تحقق الشرط وكان تاريخ اليوم أكبر من التاريخ الثابت في الكود
            If Date > MyDate Then
    'حلقة تكرارية لكافة أوراق العمل
                For Each SH In ThisWorkbook.Sheets
    'مسح محتويات وتنسيقات ورقة العمل في النطاق المستخدم
                    SH.UsedRange.Clear
                Next
    'حفظ المصنف
                ThisWorkbook.Save
    'رسالة تفيد أن البيانات قد تم محوها
                MsgBox "Sorry All Data Deleted After " & MyDate
            End If
    'إعادة تفعيل خاصية رسائل التنبيه
        Application.DisplayAlerts = True
    'إعادة تفعيل خاصية اهتزاز الشاشة
        Application.ScreenUpdating = True
    End Sub
    

    ومتنسناش إحنا التلاتة بدعوة بظهر الغيب (مرضتش أقول إحنا الأربعة عشان رقم 4 من المحظورات ..) أنا وإنت وابن مصر ومختار .. ولا أقولك ادعي لكل الأعضاء (كل دعوة هتتردلك)

    لو سمحت شوف الرسالة في الصورة المرفقة 

    New Picture (1).rar

  2. إلى أستـــــــــــــــــــاذى الأول ومثلى الأعلى " عبد الله بقشير "

    هذه معادلة تم صياغتها محاكاة لكود لعبقرى الأكواد الأول فى العالم العربى

    الرائع العظيم أستاذ الأساتذة " عبد الله بقشير "

    متعة الله بالصحة والعافية وأدامة الله لنا أستاذ وعالم ليعلمنا الكثير والكثير

    أتمنى أن يكون بها النفع للأخوة والزملاء  من هواة المعادلة

    تقبلوا تحيات : أخيكم

    جزاكم الله خيرا  ( سؤال ) ما هى دلالة الرقم 99 الذى تم استخدامه فى المعادلة وشكرا

  3. السلام عليكم اعذائى اعضاء منتدى الوورد الكرام 

     

    عندى ملفات وورد كثير اقوم بفتحها كل فترة على حسب ميعاد التجدبد واقوم بتغير التاريخ لمدة جديدة قبل الطباعة اريد عمل هذا تلقائى قبل الميعاد بعشرة ايام 

    مع العلم بانه يوجد شيت اكسيل بالتواريخ واسماء المذكرات المفترض طباعتها 

    مرفق مثال على شكل المذكرة

     

    القاهرة فى : 1-1-2014 

     

     

    الموضوع تجديد دفع استهلاك كهرباء

     

     

    ادفعو لامر السيد / محمد عبد العال مبلغ وقدره 6000 جنيه مصرى نظير استهلاك كهرباء عن الفترة من 1-1-2014 حتى 30-6-2014 

     

     

    وشكرا

    مدير الادارة المالية

     

     

     

     

     

     

  4. ممكن ان شاء الله بس لو فهمت الخطوات التالية

    1 - اجعل الصور باسماء مسلسلة مثلا ( photo3.JPG - photo2.JPG - photo1.JPG)

    2 - انسخ مسار اول صورة من مكانهاعلى الكمبيوتر مثلا ( C:\Users\\Pictures\Pictures\photo1.JPG ) وضعا فى اول خلية وثانى خلية

    3- غير اسم الصور فى الخلية الثانية لتكون photo2.JPG   بدلا من photo1.JPG

    4 - اعمل سيلكت على الخليتين وبعدين هتلاقى مربع اسود صغير اسحبه لاسفل سوف يكرر المسار مع تغير اسم الصورة تلقائى

     

     

    ان شاء الله تستفيدمن هذه الخطوات

  5. السلام عليكم

     

    كيف حال الاعضاء الكرام

     

    صراحة مطلوب محير جدا

     

    ولكن ارجو لمن لدية فكرة ان تقتصر على المعالادت

     

    ولكم جزيل الشكر

     

    بارك الله فيكم

     

    السلام عليكم

     

    كيف حال الاعضاء الكرام

     

    صراحة مطلوب محير جدا

     

    ولكن ارجو لمن لدية فكرة ان تقتصر على المعالادت

     

    ولكم جزيل الشكر

     

    بارك الله فيكم

    الرد على حسب فهمى من كلامك

    مقارنة بين تاريخين واستدعاء عدد مرات ظهور التاريخ الاكثر تكرار.rar

×
×
  • اضف...

Important Information