الشهابي

الأخ العزيز / حاتم مبروك جزاك الله خير على كلماتك الطيبة والحمد لله الذي وفقنا معكم تحياتي

الأخ العزيز / حاتم مبروك السلام عليكم ورحمة الله وبركاته تم عمل المطلوب بس من خلال عمود مساعد في ورقة ( جميع الجداول ) وهو العمود (W) تم تظليله باللون الأحمر كم تم تسمية الخلايا التي يكتب فيها الشعبة ودبلوم والتخصص والمستوى كل واحدة حسب الاسم الموجود في الخلية المقابلة لها وذلك لتسهيل عملية كتابة المعادلات واختصارها كما في ورقة ( الرئيسي ) الخليتين (Z2) و(Z3) وهما تحتويان على معادلات لجلب البيانات تم تظليلهما باللون الأحمر لابد من تطابق الشعبة ودبلوم والتخصص و المستوى في الجدول الرئيسي مع ما يقابلها في جميع الجداول وإلا لن يتم جلب البيانات إن شاء الله يلبي هذا طلبك تقبل تحياتي وتقدير ترحيل الجداول الى الجدول الرئيسي.rar

أستاذي العزيز الحبيب / عبد الله باقشير أولا : تشرفنا بنور وجهكم الذي أشرق على المنتدى وهذا أفرحني كثيرا حفظكم الله وبارك فيكم أم بالنسبة للفورم لا تعليق فمهما قلت لن يفي بحقكم فجزاكم الله كل خير تحياتي وتقديري لكم

أخي العزيز / زاكي بوشغلام اعتقد أن المعادلة في عمود المنح المتأخرة فيها خلل وهناك تكرار فيها والله أعلم =IFERROR(IF(Donnée!K2="نعم";IF(H5="نصف داخلي";LOOKUP(270-I5;jours_presence;boursses_DP);IF(H5="داخلي";LOOKUP(270-I5;jours_presence;Boursses_P);IF(H5="نصف داخلي";LOOKUP(270-I5;jours_presence;boursses_DP);IF(H5="داخلي";LOOKUP(270-I5;jours_presence;Boursses_P)))));0);"") ولست أنا من عملها لك لأنني وجدتها في ملفك جاهزة فلم أتدخل فيها فضلا توضيح المطلوب عمله في هذا العمود حتى يتم وضع المعادلة المطلوبة إن شاء الله

أخي العزيز / زاكي بوشغلام أولا : أعتذر عن تأخري في الرد لأنني لم اطلع على المف إلا اليوم بسبب غيابي عن المنتدى الاسبوعين الماضيين حاولت البارحة تحميل المف بس بسب ضعف ومشاكل النت لم استطع ثانيا : لم أدرك الخطأ الذي أشرت إليه ممكن مزيدا من التوضيح للخطأ وإعطاء مثال لذلك والعفو

هذاالبرنامح الذي تم تسجيل الفديو بواسطته أرفعه لكم على الرابط التالي : http://www.mediafire.com/download/3m38oob871x2j4z/SCREXESetup.rar

جزاك الله خير أستاذنا القدير / عبد الله باقشير مزيدا من الإبداع والخدمات المتميزة لخدمة إخوانكم بارك الله فيكم ورفع قدركم وزادكم الله علما ورفعة وحفظكم الله من كل مكروه

أخي العزيز / أحمد بالنسبة إدراج عنصر تحكم نموذج مربع تحرير وسرد إذا كان الأوفيس عندك 2007 وما فوق سأرفق لك تسجيل فديو صامت يوضح الطريقة وبعد إداراجه نضغط عليه باليمن فتخرج لنا قائمة نختار منها ( تنسيق عنصر تحكم ) بعد ذلك نختار علامة تبويب ( عنصر تحكم ) نحدد من خلالها 1- نطاق الخلايا وهي القائمة المنسدلة التي ستظهر في العنصر وهي قائمة المواد عندك ( $B$10:$B$17 ) 2- إرتباط الخلية والتي يتغير فيها الرقم بتغير السجل المختار من القائمة جسب تسلسلها في القائمةوهي هنا الخلية (C21) حيث كلما تغير الرقم فيها تغيرت قيمة الخلية (D21) لأن فيها معادلة بدالة (VLOOKUP) مأخوذة من نطاقة قائمة المواد مع الأرقام التي أمامها وهذه لا تخفى عليك ابعد عنصر التحكم من فوق الخلية (D21) وسوف تلاحظ المعادلة وأي استقسار آخر أو طلب آخر قم بطر حه وتوضيحه وإن شاء الله حسب الاستطاعة والقدرة سنتعاون معكم أو ربما تجد أحد من الأخوة الذين ليهم الوقت القيام بذلك إدراج زر عنصر تحكم نموذج.rar

أخي العزيز / أحمد تم عمل المعادلات المطلوبة لذلك إن شاء الله أم بالنسبة لبقاء زر القائمة المنسدلة بارزاً باستمرار أظن أن ذلك غير ممكن حسب علمي والله أعلم وإنما يتم اظهاره عندما تكون الخلية نشطة فيمكن عمل كود برمجي لجعل الخلية (D21) دائما نشطة عند فتح الصفحة أو يمكن إدراج عنصر تحكم نموذج مربع تحرير وسرد وهذا ما فعلته في ملفك لأنه لا يحتاج إلى كود برمجي لكن الأسماء تظهر فيه صغيرة أو يمكن إدراج عنصر تحكم (ActiveX) مربع تحرير وسرد ميزته أن الخط فيه وفي القائمة المنسدلة منه تستطيع أن تجعل الخط بالحجم الذي تريد وهذا يحتاج إلى كود برمجي اختر ما يناسبك وسيتم عمله إن شاء الله تقبل تحياتي ظهور خلايا بشرط ظهور خلية معينة.rar

أخي العزيز/ وليد فتحي أنت النجم القادم إلى المنتدى بقوة بارك الله فيك وهنيئاً الترقية والتي لن تتوقف هنا بل لا بد أننا سنبارك لك في ترقيات أخرى إن شاء الله أعمالكم حاضرة ودالة عليكم واختيار الترقية صائبة من علامتنا القدير عبد الله باقشير تقبل تحباتي وتقديري لكم

أخي العزيز / أحمد بالنسبة للحضور ضع المعادلة التالية في الخلية (E10) ثم اسحبها لأسفل ونثم انسخ عمود الجضور لمادة الرياضيات وألصقه في عمودي الحضور لمادتي اللغة العربية والكيمياء =SUMPRODUCT(--(INDEX(الغياب!$B$8:$AD$16;MATCH($D10;الغياب!$A$8:$A$14;0);0)="p")*(الغياب!$B$21:$AD$21=E$8)) أم بالنسبة عدد الحصص خلال الشهر لكل مادة وحسب ما وضحت في السؤال الثاني ضع المعادلة التالية في الخلية (L20) =SUMPRODUCT(--(الغياب!B21:AD21=$D$21)) أم بالنسبة للتأخر والغياب بعذر والغياب بدون غذر لم توضح الآلية والمعطيات التي يتم الحساب يها لذلك فضلا مزيدا من التوضيح حتى يتم الاحتساب بشكل مضبوط وكذلك المعادلات السابقة حسب ما فهمت من أسئلتكم وإن كان ما فهمته خطأ فضلا وضح أكثر حتى يتم الاحتساب بشكل مضبوط إن شاء الله وأم السؤال الثالث لم يتم الحل إلا بالنسبة للحضور فقط وسيتم الأكمال بعد ردكم إن شاء الله والتوضيح من قبلكم جزاكم الله خير والعفو

الأخ العزيز /maro9400 ضع الكود التالي في حدث الورقة ( ورقة1) وإن شاء الله يلبي طلبك Private Sub Worksheet_Change(ByVal Target As Range) If Intersect(Target, Range("A10:A11")) Is Nothing Then Exit Sub If Range("A10") = 0 Then Range("A15,A17,A19").EntireRow.Hidden = True Else Range("A15,A17,A19").EntireRow.Hidden = False End If If Range("A11") = 0 Then Range("A16,A18,A20").EntireRow.Hidden = True Else Range("A16,A18,A20").EntireRow.Hidden = False End If End Sub ولي طلب إليك تكرما لا قسرا بتغير اسم الظهور للغة العربية ولك مني كل التحية والتقدير والعفو احفاء الصوف.rar

أخي العزيز / مؤمن كما أخبرتك في الخاص قاعدة فقهية تقول : ( إذا حضر الماء بطل التيمم ) فقد حضر أستاذنا بن علية وأوفى بالمطلوب والحمد لله وهذا من حظك السعيد أن وجدت أستاذ مثل أستاذ بن علية ينفذ لك المطلوب والحمد لله على حصولك على مطلوبك تقبل تحياتي وتقديري

أستاذي القدير / بن علية حاجي بصراحة إبداع فوق المتصور وتعامل مع المعادلات بطريقة لا توجد إلا عند أمثالكم لم تترك لأخينا مؤمن أي طلب أو استفسار إلا وحققته له بصراحة كما قال أخينا الأستاذ / محمد السيوطي أنك ( نابغة المعادلات ) استفتدت كثيرا من طريقة تعاملك مع المعادلات وخصوصا دالتي (INDEX) و (MATCH) طريقة جديدة لم أشاهدها من قبل إلا معك أستاذنا جزيت خيرا خدمة وفائدة في نفس الوقت زادك الله علما ومعرفة وحفظك الله من كل مكروه

العفو تم تكرار الإرسال فتم الحذف

أخي العزيز / عادل أبو زيد كما ذكرت بساطة الكود لأنه عبارة تسجيل ماكروا للتصفية المتقدمة حيث يعتمد في تطبيقه على عناوين الأعمدة فهذه النقطة مهمة جدا فلو اختلف عنوان عمود في ورقة التصفية عن نفس عنوان العمود المطلوب جلب بياناته ولو بحرف أو مسافة لن يتم جلب البيانات وستظهر رسالة خطأ فلابد إذا من التطابق التام لعناوين الأعمد ة في الورقتين ورقة التصفية والورقة المراد تصفيتها وكذلك عناوين نطاق المعيار ولأنك أردت جلب البيانات بين فترتين تم تكرار تاريخ الدخول مرتين ليحدد في الأول بدء التاريخوقد استعملت إشارة (>=) والثاني نهاية التاريخ وقد استعملت إشارة إشارة (<=) بواسطة دالة (CONCATENATE) التي تقوم بتجميع عدة قيم من مصادر مختلفة في خلية واحدة ونفس الطريقة بالنسبة لتاريخ الخروج وهناك شروحات مفصلة فديو لأستاذنا الكبير / عبد الفتاح كيرة ( أبو لميس ) أو ما يعرف سابقاً بكيماس للتصفية المتقدمة وتسجيل كود لها في ثلاثة مستويات بمكن أن تطلع عليها وسوف تفيدك كثيرا إن شاء الله وهذه روابط المواضيع المستوى الأول http://www.officena.net/ib/index.php?showtopic=35371&pid=186547&st=0&#entry186547 المستوى الثاني http://www.officena.net/ib/index.php?showtopic=35376#entry186791 المستوى الثالث http://www.officena.net/ib/index.php?showtopic=35385& وهذه روابط الفديو http://www.youtube.com/watch?v=y5qekfQiw1s http://www.youtube.com/watch?v=y5qekfQiw1s http://www.youtube.com/watch?v=B_sd5lJX65M وإي استفسارات أخرى يمكن أن تضعها وستجد لها جوابا عند الأخوة الكرام إن شاء الله والعفو تقبل تحياتي

أخي العزيز / عادل أبو زيد وبعد إذن الأساتذة الكرام حفظهم الله هذا حل بالكود عن طريق تسجيل كود للتصفية المتقدمة ومعيار التصفية لورقة ( دخول أقراص) هو النطاق من ( Y1) إلى (AB2) ومعيار التصفية لورقة ( خروج أقراص) هو النطاق من ( AA1) إلى (AD2) إن شاء الله هذا يلبي طلبك وجمعة مباركة والعفو كشف حساب من شيتين على شكل حرف T.rar

أخي العزيز / مهند الزيدي لكثرة الملفات المحملة تم رفع ملف بالخطأ المهم تم التعديل وإرفاق الملف الصحيح إن شاء الله وتم التعامل على حسب عدد الأعمدة المطلوب ظهورها في الفورم في كل صفحة فمثلا في ورقة ( مثال1 و مثال 2 ) 8 أعمدة وأما في ورقة ( صفحة2) 9 أعمدة وأي ورقة تضاف جديدة يجب نسخ المعادلات في الخلايا من (DA1) إلى (DD1) وتعديل الرقم في المعادلات في الخلايا السابقة حسب الأعمدة المراد ظهورها في الفورم والطباعة (7) إذا كانت الأعمدة المطلوبة (8) ويكون (8) إذا كانت الأعمدة المطلوبة (9) وهكذا يكون العدد ناقص رقم عن عدد الأعمدة الرقم اللي بعد دالة ( MATCH) الثانية +7 الخلية (DA1) =ADDRESS(3;MATCH(DE1;$2:$2;0);1;1)&":"&ADDRESS(3;MATCH(DE1;$2:$2;0)+7;1;1) الخلية (DB1) =ADDRESS(3;MATCH(DE1;$2:$2;0)+1;1;1)&":"&ADDRESS(3;MATCH(DE1;$2:$2;0)+7;1;1) الخلية (DD1) =ADDRESS(3;MATCH(DE1;$2:$2;0);1;1)&":"&ADDRESS(47;MATCH(DE1;$2:$2;0)+7;1;1) كما أنه عند النقر على زر معاينة وطباعة تتم معاينة الصفحة ومن ثم الطباعة بعد الخروج من المعاينة والطباعة تتم حت الصف ( 47) وإذا أردت الزيادة في تحديد ناحية الطباعة عدل الرقم (47) في المعادلة الأخيرة في الخلية (DD1)إلى الرقم الذي تريد لاحظ المرفق منتظر ردكم واستفسارتكم جمعة مباركة فورم ادخال و تعديل مرن باستخدام اسم نطاق للقائمة_3_2.rar.rar

أخي العزيز / أبو طارق هل جربت الملف الذي رفعته لك في المشاركة رقم 15#

أخي العزيز / أبو طارق وبعد إذن الأخوين العزيزين والأستاذين القديرين / محمد أبو ابراء و محمد أبو عباس أحببت أن أشاركهما وأقدم هذا الحل لعله يفي بالغرض إن شاء الله وربما كان السبب في عدم عمل المعادلات السابقة هو أني وجدت الحساب في ملفك يدوي وليس تلقائي تحياتي وتقديري لكم جميعا والعفو العمل بكامله.rar

أخي العزيز / مهند الزيدي تم عمل المطلوب بعد الأستفادة من عمل أخينا العزيز الأستاذ / الجموعي حفظه الله فورم انتقال باسم الورقة واسم نطاق_4.rar

أخي العزيز / مهند الزيدي هناك خطأ في معادلات النطاق وهذا الملف بعد التصحيح فورم ادخال و تعديل مرن باستخدام اسم نطاق للقائمة_3_2.rar

أخي العزيز / مهند الزيدي هذا حل عن طريق الفورم كا طلبت بس الفضل يعود لأستاذنا الكبير حمادة عمر وأكواده الرائعة مثله فقد استخدمتها من أجل عمل القوائم المنسدلة لللأوراق و الجداول بس هناك شرط حتى يتم العمل بشكل صحيح وهو : أن يكون عدد الأعمدة في كل جدول ( 8) لأن هناك معادلة في النطاق المسمى ( النطاق ) وكذلك النطاق المسمى ( الترقيم ) تحدد بداية النطاق ونهايته للفورم المرن لأستاذنا الكبير عبد الله باقشير فورم ادخال و تعديل مرن باستخدام اسم نطاق للقائمة_3_2.rar

حبيبي وأستاذي القدير / حمادة عمر ما هذه الأخلاق الرائعة التي تتمتعون بها تعتذر مني أنا بالعكس نحن الذين يجب أن نعتذر لكم بارك الله فيكم ورفع الله قدركم وأثابكم كل خير ورحم الله والدكم وأسكنه فسيح جناته وبالنسبة لطلب أخينا مهند اليزيدي فقد استعملت أكوادكم في حل عملته هذا الصباح وأحببت أن أشارككم فيه تحياتي وتقديري

أخي العزيز / مهند الزيدي مارأيك في هذه الطريقة حيث هناك خلايا مساعدة تم تلوينها باللون الأحمر لمعرفتها إن شاء الله يحقق هذا مطلوبك لاحظ المرفق فورم ادخال و تعديل مرن باستخدام اسم نطاق للقائمة_3_2.rar