ehabaf2 قام بنشر سبتمبر 13, 2023 مشاركة قام بنشر سبتمبر 13, 2023 السلام عليكم الاساتذة الافاضل اهل الخبرة بعد اذن حضراتكم عندى شيت حضور و غياب المعلمين محتاج معادلة او كود يستخرج تواريخ ايام الغياب للمعلم خلال فترة محددة من واقع شيت الحضور و الغياب مرفق ملف للتوضيح و لكم جزيل الشكر الاساتذة الافاضل ياريت لو مفيش معادلة أو كود تنفذ المطلوب اي حد يكتب لى انه مينفعش تنفيذ المطلوب لعدم الانتظار طويلا اكرر شكرى لحضراتكم غياب يومية.xlsx رابط هذا التعليق شارك More sharing options...
ابراهيم الحداد قام بنشر سبتمبر 13, 2023 مشاركة قام بنشر سبتمبر 13, 2023 السلام عليكم و رحمة الله استخدم هذا الكود Sub Get_AbsDay() Dim ws As Worksheet, LR As Long Dim I As Long, C As Range, x As Integer Dim A As String, B As String, Kod As String Dim p As Integer, q As Integer Set ws = Sheets("Sheet1") ws.Range("R8:U8") = "" ws.Range("R10:U10") = "" '--------------------- LR = ws.Range("B" & Rows.Count).End(3).Row Kod = ws.Range("N6").Value p = 17 q = 17 A = "أ" B = "غ" I = 2 Do While I <= LR If ws.Cells(I, 1) = Kod Then ws.Range("N8").Value = ws.Cells(I, 2).Value x = ws.Cells(I, 1).Row For Each C In ws.Range(ws.Cells(x, 3), ws.Cells(x, 10)) If C.Value = A Then p = p + 1 ws.Cells(8, p).Value = ws.Cells(2, C.Column).Value ElseIf C.Value = B Then q = q + 1 ws.Cells(10, q).Value = ws.Cells(2, C.Column).Value End If Next End If I = I + 1 Loop End Sub 4 رابط هذا التعليق شارك More sharing options...
ehabaf2 قام بنشر سبتمبر 13, 2023 الكاتب مشاركة قام بنشر سبتمبر 13, 2023 (معدل) السلام عليكم استاذ ابراهيم الحداد الف الف شكر لمرورك الكريم و مساعدة حضرتك الكود يعمل و يستخرج التواريخ و لكن لا يرتبط بالفترة الزمنيه المحدد يعني بيستخرج كل التواريخ للمعلم المستعلم عنه و انا محدد مثلا فترة محددة مش كل الفترة فهل ممكن يلتزم بالفترة المحددة اكرر شكرى لحضرتك تم تعديل سبتمبر 13, 2023 بواسطه ehabaf2 رابط هذا التعليق شارك More sharing options...
أفضل إجابة محي الدين ابو البشر قام بنشر سبتمبر 13, 2023 أفضل إجابة مشاركة قام بنشر سبتمبر 13, 2023 عليكم السلام عسى غياب يومية.xlsm 4 رابط هذا التعليق شارك More sharing options...
ehabaf2 قام بنشر سبتمبر 14, 2023 الكاتب مشاركة قام بنشر سبتمبر 14, 2023 الاستاذ الفاضل محى الدين ابو البشر الف شكر لحضرتك الكود يعمل و ينفذ المطلوب الف الف شكر لحضرتك و استاذنا الفاضل ابراهيم الحداد الف شكر لحضرتك زادكم الله من علمه و فضله و حفظكم بحفظه 1 رابط هذا التعليق شارك More sharing options...
محي الدين ابو البشر قام بنشر سبتمبر 14, 2023 مشاركة قام بنشر سبتمبر 14, 2023 بارك الله رابط هذا التعليق شارك 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.