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

Ali Mohamed Ali

المشرفين السابقين
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    11654

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

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

  • Days Won

    309

 نوع المحتوي 

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

  1. Ali Mohamed Ali
    أهلا بك اخى الكريم فى المنتدى يمكنك استخدام خاصية البحث فى المنتدى
  2. Ali Mohamed Ali
    وعليكم السلام بالملف موجود كود لحاصل ضرب العمودان C & D واخراج الناتج فى العمود E Sub Test() Dim LR As Long LR = Range("C" & Rows.Count).End(xlUp).Row Range("E1:E" & LR) = Evaluate("C1:C" & LR & "*D1:D" & LR) End Sub كود ضرب.xlsm
  3. Ali Mohamed Ali
    تفضل Tab_Ali.xlsx
  4. Ali Mohamed Ali
    يمكنك التغيير كما تشاء فى المعادلة الى اى تاريخ تريد وبالنسبة لعلامة السالب يمكنك حلها ببساطة بضرب الناتج فى *-1
  5. Ali Mohamed Ali
    تفضل نفس كود استاذنا الكبير سليم له منا كل المحبة والإحترام frais de miss ion 019.xlsm
  6. Ali Mohamed Ali
    وعليكم السلام اهلا بك فى المنتدى-تفضل Tab_Ali.xlsx
  7. Ali Mohamed Ali
    بارك الله فيك والحمد لله الذى بنعمته تتم الصالحات
  8. Ali Mohamed Ali
    تفضل طبعا هيشتغل الضغط على الإنتر بدلا من الزر2.xlsm
  9. Ali Mohamed Ali
    يعمل معى كما ترى بالصورة 5الاستيك.rar
  10. Ali Mohamed Ali
    تفضل
  11. Ali Mohamed Ali
    من فضلك حدد بالضبط ما يحدث معك بالصور على الملف فالملف يعمل معى تمام
  12. Ali Mohamed Ali
    لأنك لم تقم بضبط تنسيق الخلية التى بها جملة السن فى 01/10/2019 كما بالصورة كان عليك من البداية رفع الملف الأصلى للعمل عليه تفضل اجهزه2.xlsm
  13. Ali Mohamed Ali
    أحسنت استاذ سليم بارك الله فيك كود ممتاز
  14. Ali Mohamed Ali
    تفضل لك ما طلبت -كما انه تم ضبط كود الإدخال والترحيل الى الشيت الضغط على الإنتر بدلا من الزر.xlsm
  15. Ali Mohamed Ali
    هذا لكيفية جلب المجموع للخلايا الظاهرة فقط دون المخفية
  16. Ali Mohamed Ali
    طبعا بعد اذن استاذنا الكبير سليم تفضل اخى الكريم لك ما طلبت استخراج تاريخ الميلاد من الرقم القومى على ثلاثة خلايا.xlsx
  17. Ali Mohamed Ali
    أهلا بك اخى الكريم فى المنتدى عليك بإستخدام خاصية البحث فى المنتدى فهناك موضوعات كثيرة تخص المرتبات
  18. Ali Mohamed Ali
    وعليكم السلام تفضل لك ما طلبت Book2.xlsx
  19. Ali Mohamed Ali
    تفضل لك ما طلبت وضعت كود لطباعة كل الإستمارات استمارة متابعة حفظ.xlsm
  20. Ali Mohamed Ali
    بعد اذن استاذنا الكبير سليم هذه معادلة أخرى لإثراء الموضوع أوفيسنا.xlsx
  21. Ali Mohamed Ali
    اذا كنت تقصد هكذا بقائمة منسدلة فتفضل وان لم يكن هذا هو المطلوب فعليك بتوضيح المطلوب بالتفصيل على الملف استمارة متابعة حفظ.xls
  22. Ali Mohamed Ali
    تفضل 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 'نهاية الكود
  23. Ali Mohamed Ali
    تفضل 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 'نهاية الكود
  24. Ali Mohamed Ali
    بارك الله فيك استاذنا الكريم وجزاك الله كل خير
  25. Ali Mohamed Ali
    تفضل هذا الملف وجدته عندى لعله يفيدك ترحيل الى دفتر اليومية القيود.xlsm
×
×
  • اضف...

Important Information

  I accept