خالد عبد الغفار
03 عضو مميز-
Posts
323 -
تاريخ الانضمام
-
تاريخ اخر زياره
السمعه بالموقع
67 Excellentعن العضو خالد عبد الغفار
البيانات الشخصية
-
Gender (Ar)
ذكر
-
Job Title
معلم
-
البلد
مصر
-
الإهتمامات
اكسيس
اخر الزوار
-
الذكاء الإصطناعي chatGPT في انشاء اكواد VBA
خالد عبد الغفار replied to دروب مبرمج's topic in قسم الأكسيس Access
نتيجة محاوله دامت لاكثر من ساعتين ونصف بشرح مفصل Sub DistributeCommitteeRoles() ' تعريف المتغيرات Dim wsTeachers As Worksheet Dim wsCommittees As Worksheet Dim lastRowTeachers As Long Dim lastRowCommittees As Long Dim teacherRow As Long Dim committeeRow As Long ' تعيين ورقة العمل "tb_tashkeel" Set wsTeachers = ThisWorkbook.Sheets("tb_tashkeel") ' تحديد آخر صف في ورقة العمل "tb_tashkeel" lastRowTeachers = wsTeachers.Cells(wsTeachers.Rows.Count, "A").End(xlUp).Row ' تعيين ورقة العمل "tb_lgan" Set wsCommittees = ThisWorkbook.Sheets("tb_lgan") ' تحديد آخر صف في ورقة العمل "tb_lgan" lastRowCommittees = wsCommittees.Cells(wsCommittees.Rows.Count, "A").End(xlUp).Row ' حلقة لتحديد اللجان وتوزيع الأدوار For teacherRow = 2 To lastRowTeachers ' نبدأ من الصف 2 لتجنب العناوين ' الشروط التي يجب تحقيقها لتوزيع الأدوار If wsTeachers.Cells(teacherRow, "work_cod").Value = 1 Then ' استدعاء دالة لتوزيع الأدوار DistributeRoles wsTeachers.Cells(teacherRow, "teach_cod").Value, wsTeachers.Cells(teacherRow, "gov_cod").Value End If Next teacherRow ' رسالة تأكيد عند الانتهاء MsgBox "تم توزيع الأدوار بنجاح!", vbInformation End Sub Sub DistributeRoles(teacherCode As Long, teacherGovCode As Long) ' يمكنك هنا تكميل الكود بتحديد وتوزيع الأدوار وفقًا لمتطلباتك ' يمكنك استخدام الأوامر SQL لاستعلام قواعد البيانات أو الشيتات المعنية ' على سبيل المثال: "SELECT * FROM tb_lgan WHERE gov_cod <> " & teacherGovCode ' يمكنك أيضًا تحديد الأفراد المؤهلين لتولي دور معين وتخزين رقم اللجنة في جدول tb_tashkeel ' يُفضل استخدام وظائف مساعدة لتحقيق ذلك بشكل فعّال ' يمكن أن يكون ذلك بمثابة نقطة بداية للتعديل وفقًا لاحتياجاتك الفعلية End Sub -
خالد عبد الغفار started following تقرير احصائى , الذكاء الإصطناعي chatGPT في انشاء اكواد VBA , توزيع الملاحظين و 2 اخرين
-
الذكاء الإصطناعي chatGPT في انشاء اكواد VBA
خالد عبد الغفار replied to دروب مبرمج's topic in قسم الأكسيس Access
فعلا غبى جدا حاولت اخلية يكتب كود توزيع رؤساء لجان ومراقبين اوائل على مستوى عام ( الجمهورية ) وكانت النتائج مخيبه للامال -
تفضل كود التوزيع لأستاذنا الفاضل جعفر وتعديل الآحتياطى ساعدنى فيه احد الأصدقاء للامانه انا عملت تقرير f1 يمكنك تتبع مصدره توزيع الملاحظين.rar
-
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
الف شكر لك استاذنا / Barna عملت تجربه على السريع كده والحمد لله الننتيجه مرضيه جدا وألف شكر لك مرة اخرى استاذنا الفاضل تقبل تحياتى -
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
كل الشكر لك استاذنا نجرب ما تفضلتم به على برنامج العمل ونوافيكم بالنتيجة استاذنا تقبل تحياتى -
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
لو امكن استاذنا / Barna نرى التطبيق على المرفق لنطبقه على بيانات متكامله تخص العمل لنستطيع الحكم عليه شكرا لك ولاستاذنا /kanory على تعبكما -
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
أشكرك استاذنا على هذا المجهود نعم مع تعديل الا وهو اود عدم ظهور باقى الحقول الخاليه لان التقرير المطلوب بيكون بجانب رقم الطالب رقمه السرى واسمه ومدرسته ومحافظته وتخصصه وهكذا انظر مثلا -
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
مرحبا بك اخى الفاضل مرة أخرى يمكن أن يكون السبب الصفر الموجود بالدرجة اثناء التجربة انا حذفته فى الصوره اللى ارفقتها -
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
-
إظهار واخفاء بيانات فى التقرير
خالد عبد الغفار replied to خالد عبد الغفار's topic in قسم الأكسيس Access
اهلا بك استاذنا / kanory الرقم ده طالب مثلا 3 مواد من 9 رياضه ورسم فنى ومساحه ودول مثلا المطلوب ظهورهم فقط امام رقمه واخفاء باقى المواد الخاليه بدرجاتها الصفر الموضوع مكان الدرجه ممكن بس من التجارب فقط شكرا لك استاذنا انا عاوز محاذة مواد الطالب ولما معرفتش اعملها قلت الجأ للحل اتانى انى احاول اخلى الرقم اللى طالب مثلا ماده يكتب مره واحده بمادته واللى طالب مادتين يتكرر مرتين امام كل رقم الماده وهكذا -
السلام عليكم ورحمة الله وبركاته تحياتى للجميع بالمرفق جدول يحتوى على المواد التى يود الطالب ان يتقدم يتظلم بها ( tazalumat )عملت لها تقرير( tazlme ) وبحثت عن اخفاء المواد الخاليه بدرجة الماده ثم المحاذاه افقيا لم اتوصل للمراد فهل يمكن تحويل الصفوف الى اعمده لتظهر بنفس الآليه الموجودة بجدول ( tazalumat_1 ) ليكون ناتجها الموجود بتقرير 1 ارجو ممن لديه الخبرة المساعدة إن أمكن وللجميع تحياتى مواد التظلم.rar
-
استاذنا الفاضل جعفر تحياتى لشخصكم النبيل نعم اكملت التقرير امس (او صباحا) والفرق اصبح رهيب جربت الطباعة كمان اول ما وصلت العمل والنتائج مضبوطه والفرق واضح جدا والفضل لكم بعد الله تعالى بارك الله فيك والف الف شكر استاذنا الفاضل وجزاكم الله خير الجزاء وسدد خطاك
-
جزاك الله خير الجزاء استاذنا ومعلمنا الجليل واعتذر لتعبك جعله الله فى ميزان حسناتك سوف اجرب المرفق واكمل بنفس الطريقه إن شاء الله وألف شكر لحضرتك استاذنا ومعلمنا الجليل مرة أخرى دمت بكل خير
-
تمام استاذنا الفاضل / جعفر تم تعديل الكود وإدراج كم اكثر من البياننات لاكتشاف البطء تقرير احصاء.rar
-
السلام عليكم ورحمة الله بالمرفق تقرير مصدره استعلام يقوم بعد مواد الدور الثانى لعدة تخصصات العد فى التقرير سليم بس بيشتغل ببطء ومسبب مشكله فى العمل خصوصا والاعداد اكثر من لك بكثير فهل من حل لهذا البطء خاصة الاعداد تفوق المتواجد بكثر تقرير احصاء.rar