سيد رجب قام بنشر أبريل 13, 2018 مشاركة قام بنشر أبريل 13, 2018 ارجو المساعدة بإظهار عدد أيام الغياب بهذا الشكل مرفق الملف تقرير غياب.rar رابط هذا التعليق شارك More sharing options...
احمد بدره قام بنشر أبريل 14, 2018 مشاركة قام بنشر أبريل 14, 2018 تفضل الكود =COUNTA(B4:AC4) وقمت إضافة 3 أعمدة حتي يتم حساب غياب أي شهر 31يوم فأصبح الكود =COUNTA(B4:AF4) تقرير غياب.rar رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر أبريل 14, 2018 مشاركة قام بنشر أبريل 14, 2018 ممكن تجرب هذا تقرير غياب.xlsx رابط هذا التعليق شارك More sharing options...
سيد رجب قام بنشر أبريل 14, 2018 الكاتب مشاركة قام بنشر أبريل 14, 2018 شكرا علي الاهتمام لاكن يوجد خطاء بإظهار النتائج رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر أبريل 14, 2018 مشاركة قام بنشر أبريل 14, 2018 السلام عليكم ورحمة الله استخدم هذا الكود Sub Absents() Dim C As Range, M As String Dim R As Integer R = 4 Do While Cells(R, 1) <> "" For Each C In Range("B" & R & ":AC" & R) If C.Value = "غ" Then M = Day(Cells(2, C.Column)) & "," & M Range("AD" & R) = M End If Next R = R + 1 M = "" Loop End Sub رابط هذا التعليق شارك More sharing options...
سيد رجب قام بنشر أبريل 14, 2018 الكاتب مشاركة قام بنشر أبريل 14, 2018 شكرا وضعت الكود ولم يشتغل رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر أبريل 14, 2018 مشاركة قام بنشر أبريل 14, 2018 (معدل) السلام عليكم ورحمة الله لن يعمل معك الكود و خلايا الاسم فارغة تم تعديل أبريل 14, 2018 بواسطه زيزو العجوز رابط هذا التعليق شارك More sharing options...
احمد بدره قام بنشر أبريل 15, 2018 مشاركة قام بنشر أبريل 15, 2018 حفظ الله أستاذنا الجليل الأستاذ / زيزو العجوز وبعد إذنه قمت بعمل تعديلات على الملف لكي يصبح الملف يصلح لأي شهر من السنة بداية من سنة 2018 م وذلك بكتابة رقم الشهر في الخلية A1 وكتابة رقم السنة في الخلية A2 بشرط كتابة رقم السنة أولاً ثم كتابة اسم الشهر ، ومع كتابة رقم الشهر سوف تتغير أيام وتاريخ الشهر تلقائيًا مع إخفاء الأعمدة الفارغة للشهور التي أقل من 31 يوم . تفضل الملف الملف وتحياتي للجميع تقرير غياب.xlsm رابط هذا التعليق شارك More sharing options...
سيد رجب قام بنشر أبريل 15, 2018 الكاتب مشاركة قام بنشر أبريل 15, 2018 استخدمت الملف الاخ احمد ولاكن مش شغال اضفت علية اسمين لا تغير مرفق الملف للتوضيح تقرير غياب.rar رابط هذا التعليق شارك More sharing options...
سيد رجب قام بنشر أبريل 15, 2018 الكاتب مشاركة قام بنشر أبريل 15, 2018 شكرا بعد تجربة الملف اتضح ان بعد إضافة أي تغير بالملف لازم تفعل الكود وبعد اذن الاخوه ومجهوداتهم الرائعة اضفت زر تشغيل للتفعيل الرجاء التجربة وابداء الراي وطبعا لكم الفضل في الأول والأخر تقرير غياب.rar رابط هذا التعليق شارك More sharing options...
Ali Mohamed Ali قام بنشر أبريل 15, 2018 مشاركة قام بنشر أبريل 15, 2018 جرب كده تقرير غياب.xlsm رابط هذا التعليق شارك More sharing options...
سيد رجب قام بنشر أبريل 15, 2018 الكاتب مشاركة قام بنشر أبريل 15, 2018 (معدل) تمام كدة وانا سعيد لأننا وصلنا لنفس النتيجة والفكرة شكرا للاهتمام تم تعديل أبريل 15, 2018 بواسطه سيد رجب رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.