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

Ali Mohamed Ali

المشرفين السابقين
  • Posts

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

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

  • Days Won

    307

كل منشورات العضو Ali Mohamed Ali

  1. تفضل نفس كود استاذنا الكبير سليم له منا كل المحبة والإحترام frais de miss ion 019.xlsm
  2. وعليكم السلام اهلا بك فى المنتدى-تفضل Tab_Ali.xlsx
  3. بارك الله فيك والحمد لله الذى بنعمته تتم الصالحات
  4. تفضل طبعا هيشتغل الضغط على الإنتر بدلا من الزر2.xlsm
  5. يعمل معى كما ترى بالصورة 5الاستيك.rar
  6. من فضلك حدد بالضبط ما يحدث معك بالصور على الملف فالملف يعمل معى تمام
  7. لأنك لم تقم بضبط تنسيق الخلية التى بها جملة السن فى 01/10/2019 كما بالصورة كان عليك من البداية رفع الملف الأصلى للعمل عليه تفضل اجهزه2.xlsm
  8. أحسنت استاذ سليم بارك الله فيك كود ممتاز
  9. تفضل لك ما طلبت -كما انه تم ضبط كود الإدخال والترحيل الى الشيت الضغط على الإنتر بدلا من الزر.xlsm
  10. هذا لكيفية جلب المجموع للخلايا الظاهرة فقط دون المخفية
  11. طبعا بعد اذن استاذنا الكبير سليم تفضل اخى الكريم لك ما طلبت استخراج تاريخ الميلاد من الرقم القومى على ثلاثة خلايا.xlsx
  12. أهلا بك اخى الكريم فى المنتدى عليك بإستخدام خاصية البحث فى المنتدى فهناك موضوعات كثيرة تخص المرتبات
  13. وعليكم السلام تفضل لك ما طلبت Book2.xlsx
  14. تفضل لك ما طلبت وضعت كود لطباعة كل الإستمارات استمارة متابعة حفظ.xlsm
  15. بعد اذن استاذنا الكبير سليم هذه معادلة أخرى لإثراء الموضوع أوفيسنا.xlsx
  16. اذا كنت تقصد هكذا بقائمة منسدلة فتفضل وان لم يكن هذا هو المطلوب فعليك بتوضيح المطلوب بالتفصيل على الملف استمارة متابعة حفظ.xls
  17. تفضل Sub LinkChecks() 'بداية الكود i = 5 'ترمز i هنا الى رقم الصف ويساوى هنا الصف الخامس For Each cb In ActiveSheet.CheckBoxes 'كما ترمز Cb الى شيك بوكس بمعنى فى كل الشيك بوكس الموجود فى الورقة النشطة التى تعمل عليها cb.LinkedCell = Cells(i, "h").Address 'الخلية التى يعمل عليها الشيك بوكس تبدأ فى العمود h -وكما وضحنا سابقا رقم الصف وهو 5 ,وذلك يعنى ان تبدأ من الخلية H5 i = i + 1 'وهذا السطر يعنة الصف الخامس ثم الذى يليه Next cb 'ثم الشيك بوكس التالى End Sub 'نهاية الكود
  18. تفضل Sub LinkChecks() 'بداية الكود i = 5 'ترمز i هنا الى رقم الصف ويساوى هنا الصف الخامس For Each cb In ActiveSheet.CheckBoxes 'كما ترمز Cb الى شيك بوكس بمعنى فى كل الشيك بوكس الموجود فى الورقة النشطة التى تعمل عليها cb.LinkedCell = Cells(i, "h").Address 'الخلية التى يعمل عليها الشيك بوكس تبدأ فى العمود h -وكما وضحنا سابقا رقم الصف وهو 5 ,وذلك يعنى ان تبدأ من الخلية H5 i = i + 1 'وهذا السطر يعنة الصف الخامس ثم الذى يليه Next cb 'ثم الشيك بوكس التالى End Sub 'نهاية الكود
  19. بارك الله فيك استاذنا الكريم وجزاك الله كل خير
  20. تفضل هذا الملف وجدته عندى لعله يفيدك ترحيل الى دفتر اليومية القيود.xlsm
  21. بارك الله فيك وجزاك الله كل خير على كلمات حضرتك الرقيقة والحمد لله الذى بنعمته تتم الصالحات
  22. وعليكم السلام لك ما طلبت بالعربى والإنجليزى تفقيط عربى وانجليزى.xlsm
  23. اهلا بك اخى الكريم فى المنتدى عليك برفع الملف حتى تتم المساعدة ان شاء الله على اكمل وجه
  24. تفضل لك ما طلبت جمع الخلايا المحددة التي بها علامة صح.xlsm
×
×
  • اضف...

Important Information