نجوم المشاركات

الاخ سليم حاصبيا انك انسان مؤدب هذه هي القواعد القديمة التي نفتقدها

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

تهنئة بالترقية نبارك لأستاذنا الكريم: سليم حاصبيا المحترم انضمامه إلى فريق القمة في منتدانا العريق أوفيسنا نرجو لكم دوام التقدم والعطاء

اخي العزيز قصدك هكذ مثل هذا المثال المرفق ؟؟! Database1.rar

سليم حاصبيا اخى الفاضل تحياتى و ايام مباركه تعودنا ان يكون هناك هديه مع الترقيه مبنحبش العيديه تكون ناشفه ياسر خليل أبو البراء _ عمر الحسيني _ أبو حنــــين مش كده ولا ايه فى الانتظار و كل عام و انتم بخير

وعليكم السلام أخي محمد ملفك يعمل بشكل ممتاز ولا مشكلة فيه عندي حاول توضح ما هي رسالة الخطأ التي تظهر لديك؟ انقر على كلمة Debug ثم انسخ سطر المشكلة إلى المشاركة أو صور المشكلة لتتضح الصورة الخطوات التي قمت بها صحيحة إن شاء الله والكود يعمل وإليك الدليل 2016-09-08_07-06-01.rar

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

الساده / أعضاء المنتدى المحترمين سلام الله عليكم جميعا ورحمته وبركاته قمت بعمل تجميع لعديد من البرامج الجاهزة وقد قمت بتجميعها من خلال البحث فى المنتدى فسامحونى إن كنت نسيت نموذج لأحد الأساتذه الأعضاء نتمنى من الله عز وجل أن ينتفع بها الجميع تلك البرامج و النماذج القيمه هى مجهود للساده الأعضاء بارك الله فيهم وزادهم الله من فضله وجزاهم رب العالمين عنا خير الجزاء وبرامج ونماذج قاموا بتنفيذها بناء على طلبات من الساده الأعضاء وتقبلوا منى وافر الإحترام والتقدير أخيكم فى الله محمود الشريف وإليكم النماذج برنامج متابعه حركة السيارات للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=49733#entry303008 برنامج مصاريف سيارات وأرصده للأستاذ / محمد مصطفى أبو حمزة http://www.officena.net/ib/index.php?showtopic=46058#entry273859 برنامج مراقبة خطابات الضمان للاستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=38044#entry209393 برنامج نظام حركة المستودعات ومتابعة المخزون للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=38870#entry213211 برنامج للعيادات الطبية للأستاذ / مدحت http://www.officena.net/ib/index.php?showtopic=32830#entry169369 برنامج السكرتير الخاص للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=42018#entry239414 برنامج للأقساط _ مجهود مشترك بين الأستاذ / حسام والأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=46619#entry279457 تعديل للبرنامج السابق للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=46619#entry279481 تعديل للبرنامج السابق للاستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=46619#entry279786 برنامج أقساط الإصدار الأول للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=29892#entry148900 برنامج أقساط الإصدار الثانى للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=29892#entry149116 برنامج أقساط الإصدار الثالث للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=29892#entry149553 برنامج أقساط الإصدار الرابع للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=29892#entry150361 برنامج متابعة الوثائق للأستاذ / الجزيرة http://www.officena.net/ib/index.php?showtopic=31712#entry161472 برنامج لقاعده بيانات عمل مشترك بين الأستاذ / قارى _ والأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=44485#entry259617 نموذج أقساط للأستاذ /سايق الخير http://www.officena.net/ib/index.php?showtopic=38538#entry210055 قام بالتعديل عليه الأستاذ / عبد الله المجرب http://www.officena.net/ib/index.php?showtopic=38538#entry210056 قام بالتعديل عليه الأستاذ / بن عليه حاجى http://www.officena.net/ib/index.php?showtopic=38538#entry210084 برنامج المخزون الإصدار الأول للأستاذ / عمرو http://www.officena.net/ib/index.php?showtopic=41247#entry233101 برنامج المخزون الإصدار الثانى للأستاذ / عمرو http://www.officena.net/ib/index.php?showtopic=43332#entry250295 برنامج المخزون الإصدار الثالث للأستاذ / عمرو 2010 http://www.officena.net/ib/index.php?showtopic=46059#entry273864 برنامج المخزون الإصدار الثالث للأستاذ / عمرو 2007 : 2010 http://www.officena.net/ib/index.php?showtopic=46059#entry273864 برنامج مرتبات للقطاع الخاص للأستاذ / سعيد بيرم http://www.officena.net/ib/index.php?showtopic=41465#entry240172 برنامج الصادر والوارد _ الإتصالات الإدارية للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=46813#entry281283 برنامج الإتصالات الإدارية الإصدار الأول للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=37265#entry199078 برنامج الإتصالات الإدارية الإصدار الثانى للأستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=37265#entry199224 برنامج الإتصالات الإدارية الإصدار الأخير للاستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=37265#entry199421 برنامج للتعامل مع طلبات الشراء والموردين للأستاذ / أبو عبد الله http://www.officena.net/ib/index.php?showtopic=30844#entry155312 برنامج حجز الغرف الفندقية عمل مشترك بين الأستاذ / هانى بدر والأستاذ / أبو عبد الله http://www.officena.net/ib/index.php?showtopic=39568&page=2#entry224762 برنامج حسابات المطاعم للأستاذ هانى بدر http://www.officena.net/ib/index.php?showtopic=32220&page=2#entry189567 برنامج دليل الهاتف الإصدار الثانى للأستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=27222#entry131055 برنامج فواتير منوع للأستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=26948#entry129215 برنامج حافظة شخصية دليل الهواتف للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=26211#entry124665 برنامج التقويم ( التاريخ ) للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=26155#entry124252 فاتورة للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=24322#entry113573 برنامج الفواتير كامل للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=24191#entry112811 برنامج سندات القبض والصرف للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=24191#entry112811 برنامج خبور المحاسبى برنامج كامل للأستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=17944#entry80465 برنامج خبور المحاسبى الإصدار الثالث للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=16879#entry74858 برنامج خبور الإصدار الثانى للأستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=16256#entry71834 برنامج خبور المحاسبى الإصدار الأول للأستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=15933#entry69998 برنامج حسابات للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=14978#entry65693 برنامج حسابات للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=14880#entry65142 برنامج حسابات للاستاذ / عبد الله باقشير http://www.officena.net/ib/index.php?showtopic=14619#entry63693 برنامج شراكة العقارات للاستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=49900#entry304640 برنامج الشيكات للاستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=50143#entry306916 برنامج كشوف حسابات ( منه له ) للاستاذ / أحمد زمان http://www.officena.net/ib/index.php?showtopic=50819#entry312828 معظم برامج شئون العاملين وما يتعلق بها لعديد من الأساتذة رابط تجميعى لـ محمود الشريف http://www.officena.net/ib/index.php?showtopic=51271&hl= نسخة تجريبية لنموذج شيك لـ محمود الشريف http://www.officena.net/ib/index.php?showtopic=51306#entry317305 برنامج لمتابعة أسعار الصرف ( العملات ) لـ محمود الشريف http://www.officena.net/ib/index.php?showtopic=51109#entry315286 برنامج متابعة حركة السيارات قابل للتعديل وبه امكانية متابعة الوثائق لـ / محمود الشريف http://www.officena.net/ib/index.php?showtopic=51386#entry318102 برامج ونماذج التنبيه لعديد من الأساتذة رابط تجميعى لـ محمود الشريف http://www.officena.net/ib/index.php?showtopic=51261&hl= برنامج دليل الهاتف المتطور للأستاذ / أحمد حمور http://www.officena.net/ib/index.php?showtopic=33881#entry176806 برنامج دليل الهاتف العصرى للأستاذ / أحمد حمور http://www.officena.net/ib/index.php?showtopic=34679&page=2#entry182322 برنامج دليل الهاتف على طريقة سامسونج للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=46463#entry277636 برنامج خاص لمحاسبة وجرد وصيانه الهواتف للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=48351#entry292775 برنامج تسيير الأشخاص للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=48251#entry292035 برنامج تسيير شركات النقل للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=47818#entry289335 برنامج تسيير شئون الموظفين للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=46153#entry274883 برنامج تتبع للمضيفين والآليات للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=45902#entry272143 برنامج الموردين للأستاذ / شوقى ربيع http://www.officena.net/ib/index.php?showtopic=45883#entry271941 برنامج ادارة الإيجارات الإصدار الأول للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=50382#entry309122 برنامج إدارة الخدمات المصرفية للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=51110#entry315312 برنامج إدارة الإشتراكات الشهرية للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=49929#entry304870 برنامج مستحقات نهاية الخدمة للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=47291#entry284873 برنامج سند صرف مع بيان الدفعات للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=49296#entry299662 برنامج كشف حساب للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=48492#entry293528 برنامج استمارة العائلة الإلكترونى للأستاذ / ضاحى الغريب http://www.officena.net/ib/index.php?showtopic=47555#entry287386 برامج الكنترول والمدارس لعديد من الأساتذة رابط تجميعى لـ محمود الشريف http://www.officena.net/ib/index.php?showtopic=51265&hl=

نرحب بالأخ سليم حاصبيا فى فريق الموقع ونسأل الله أن يعينك على مهام الاشراف أهلا وسهلا

تم رفع هذا الكود فى مشاركة منفصله حتى لا ننسى هذه المشاركة القائمة المنسدلة بدون فراعات تم ارفاق كود الحل من الفاضل ا / رحمه الله_ الحسامي _ هشام شلبى _ بن علية حاجي و لا تنسونا من صالح الدعاء تحياتى book_HOSSMI-new.rar _HISHAMمنسدلة بدون فراغات.rar _BEN ALYAهشام_عماد.rar

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

عزيزي لحل اشكالية التنسيق من الوورد بالماوس الايمن على حقل الدمج واختر الخيار toggle field codes سيظهر لك جملة بين قوسين . بعد اسم الحقل وقبل القوس الاخير اكتب الفورمات المناسبة لنوع الحقل سواء رقم او تاريخ مثلا للرقم \#0.00 وسيظهر الحقل كامل بهذا الشكل وعلى اساس ان اسم الحقل avg {MERGEFIELD avg \#0.00} بالتوفيق

أستاذى الفاضل / ياسر ...... السلام عليكم ورحمة الله وبركاته فى هذا الملف اعتمدت على عدد كل فصل 60 تلميذا ، ولكن يمكن عمل بعض التعديلات البسيطة ليوافق الفصل أى عدد وليكن 80 وهذا غير معقول لأن يكون الفصل بهذا العدد ومهما يكن يمكن عمل ذلك واستخدام خاصية شطر القائمة إلى قائمتين متساويتين تقريبا ، وهذا ما فهمته من قصدك فى التعليق السابق تقبل وافر تحياتى واحترامى

السلام عليكم ورحمة الله الصق هذا الكود فى موديول وخصص له زر Sub Tarhil_Boys() Range("C11:U46").ClearContents Range("C55:U89").ClearContents LR = Sheet1.Cells(Rows.Count, 3).End(xlUp).Row For R = 9 To LR If Sheet1.Cells(R, 4) = "ذكر" Then B = Application.WorksheetFunction.CountIf(Sheet1.Range("F9:F" & R), Cells(2, "M")) If Cells(2, "M") = Sheet1.Cells(R, 6) Then B = B + 11 Range("C" & B) = Sheet1.Cells(R, 3) Range("D" & B) = Sheet1.Cells(R, 27) Range("E" & B) = Sheet1.Cells(R, 9) Range("F" & B) = Sheet1.Cells(R, 10) Range("G" & B) = Sheet1.Cells(R, 11) Range("H" & B) = Sheet1.Cells(R, 12) Range("I" & B) = Sheet1.Cells(R, 19) Range("J" & B) = Sheet1.Cells(R, 5) Range("K" & B) = Sheet1.Cells(R, 2) Range("Q" & B) = Sheet1.Cells(R, 14) Range("T" & B) = Sheet1.Cells(R, 18) End If End If Next Call Tarhil_Girls End Sub Sub Tarhil_Girls() x = Cells(Rows.Count, 3).End(xlUp).Row - 1 LR = Sheet1.Cells(Rows.Count, 3).End(xlUp).Row For R = 9 To LR If Sheet1.Cells(R, 4) = "أنثى" Then B = Application.WorksheetFunction.CountIf(Sheet1.Range("F9:F" & R), Cells(2, "M")) If Cells(2, "M") = Sheet1.Cells(R, 6) Then B = B + 64 - x Range("C" & B) = Sheet1.Cells(R, 3) Range("D" & B) = Sheet1.Cells(R, 27) Range("E" & B) = Sheet1.Cells(R, 9) Range("F" & B) = Sheet1.Cells(R, 10) Range("G" & B) = Sheet1.Cells(R, 11) Range("H" & B) = Sheet1.Cells(R, 12) Range("I" & B) = Sheet1.Cells(R, 19) Range("J" & B) = Sheet1.Cells(R, 5) Range("K" & B) = Sheet1.Cells(R, 2) Range("Q" & B) = Sheet1.Cells(R, 14) Range("T" & B) = Sheet1.Cells(R, 18) End If End If Next End Sub

جرب هذ الطريقة 22.rar

تحياتى ابدأ بنفسك و ارفق ملف و للمساعده اطلع على المرفق مدونة اعمال ايقونات الماس لمنتدى اوفيسنا

طيب توكل على الله اضف وعدل ما تريد لك مطلق الحرية فيما تشاء والمشاركة فى عمل مثل هذا ستكون قطعا ممتعة ومثمرة ورائعة

شكرا على الموضوع والاجابة من المهندس ياسر

بارك الله فيك أخي الكريم جلال أعتقد العنوان يحتاج لمراجعة ..إذ أن الحلول المقدمة تسمح بوجود فراغات في القائمة المنسدلة .. بينما في وجهة نظري أن العنوان يعود لأمر آخر وهو عدم ترك خلايا فارغة في العمود الأول .. وهذا ظاهر في الملف الثاني والثالث حيث يوجد كود في حدث تغير ورقة العمل يقوم بحذف الصف في حالة أن خلايا الصف فارغة .. تقبل تحياتي

بارك الله فيك أخي الكريم جلال وجزيت خيراً صراحة الأعمال التي قدمها العمالقة أمثال الحسامي رحمه الله تحتاج لدراسة وفي بعض الأحيان تنقيح بسيط .. جربت الملف إذ أنني لا أحب أن أحمل الملف وحسب بل أقوم بالإطلاع عليه ودراسته دراسة متأنية للاستفادة منه قبل نقده وإذا تطلب الأمر تعديل أذكره لكي يستفيد الجميع هناك شرط إدخال البيانات غير سليم في الكود المقدم .. راجع الملف مرة أخرى وستتأكد من ذلك ولذا يجب التعديل على الشرط بالشكل التالي If (([U1] = 1 Or [U1] = 2) And a1 = "") Or (([U1] = 3 Or [U1] = 4) And (a1 = "" Or a2 = "")) Then MsgBox prompt:="تأكد من إدخال كافة البيانات", Title:="خطأ" Exit Sub End If تقبل تحياتي

متميز بمواضيعك لا تحرمنا من جديدك مع اني لست من الكوديين لكن لها جمهورها هنا

الف الف مبروك اخي سليم .. ترقية مستحقة بجدارة وفي محلها .. اتمنى لك التوفيق

وعسى الجنة مثواكم

من جد وجد من يكرمه ويستفيد من قدراته

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

الف مبروك اخى سليم وفقكم الله لما يحبه ويرضاه تمنياتى لك وللجميع بالتوفيق

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

تم عمل المطلوب 5555.rar

كل عام وانت بخير اخي الكريم جلال وكل عام وجميع الامة الاسلامية بخير

مبارك - نحسبه على خير - سباق بالاجابة - عالم بالمعادلات نسال الله له العفو والعافية والى الامام

الف مبروك استاذ سليم و عقبال الاستاذ عمر و الاستاذ ابو حنين ان شاء الله

تمام استاذ Shivan Rekany ان شاء الله بنوصل ل نتيجه او حل شكرا جدا

الف الف شكر استاذي الغالي سليم حاصبيا جعله الله في ميزان حسناتك هو دا المطلوب ذادك الله علما

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

اليك المعادلة المطلوبة _(تضغها في الخلية C5 ,و تسحب نزولاً) =IF($B5="","",HLOOKUP($B5,$D$1:$H$2,2,0)+COUNTIF($B$5:B5,B5)-1)

الاخوة الاعزاء في المنتدى الموقر محمد طاهر ياسر خليل أبو البراء زيزو العجوز ابو يحيى1 احمد بن ابراهيم عمر الحسيني جلال الجمال_ابو ادهم ابو عبدالبارى حسين22 قلم-الاكسل(عبدالعزيز) احمد21 الخ.... (و كل من يظهره التحقيق) الف شكر على التهنئة وان شاء الله سوية الى أبعد من الواجب الشكر ايضاً الى كل من الاخوة والأصدقاء عبد العزيز البسكري محمود عبدالله أبو حنف جلال ابو ادهم سعد عابد محي الدين

استاذ سليم مبارك تسحتقها بجدارة وإلى مراتب أعلى بإذن الله

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

الف مبروك اخى سليم والى الامام

تفضل تعديل لدالة topten TOPTEN.rar

الف مبروك استاذنا الكبير سليم

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

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

وعليكم السلام المثال غير واضح حضور الساعة الثانية عشرة مساء والخروج الساعة العاشرة صباحا والتأخر ساعتين ؟ عادة التأخر يحسب ما بعد الحضور الرسمي فمثلا اذا كان الحضور مقررا الساعة الثامنة صباحا ثم ان العامل اتى الساعة الثامنة والربع هنا يتم تسجيل 15 دقيقة تأخر هذه الآلية غير واضحة في مثالك

جزاكم الله كل الخيـــر انا حاولت فى الكود وما راضى يشتغل والان سبحان الله كنت اجرب مرة اخرى وهذا ما عمل معى واشتغل الان على اكمل وجه Private Sub ShowPassword_AfterUpdate() If Me.ShowPassword.Value = True Then Me.txtPassword.InputMask = "" Else Me.txtPassword.InputMask = "password" End If End Sub

بارك الله فيك أبا يحيى وجزيت خيراً بمثل ما دعوت لنا بالنسبة للخلايا المدمجة لا ضرورة فيها ويمكن أن تجد وسيلة أخرى للحصول على المطلوب بدون دمج عموماً الحمد لله أن تم المطلوب على خير .. تقبل تحياتي

وعليكم السلام أخي الكريم محمد أبو عبد الله 1 - قم بالدخول للرابط التالي لنسخ الكود بالكامل 2- افتح المصنف الخاص بك واضغط Alt + F11 للدخول لمحرر الأكواد 3- من قائمة Insert أدرج موديول جديد والصق فيه ما قمت بنسخه من أكواد 4- آخر جزء في الكود سيتم نقله إلى حدث ورقة العمل "ورقة2" .. لذا قم بتحديد آخر جزء في الكود ثم اضغط Ctrl + X لقص هذا الجزء ووضعه في مكان آخر 5- من نافذة المشروع انقر دبل كليك على ورقة العمل "ورقة2" لتضع الكود الذي تم قصه إلى هذا الموديول 6- اذهب لورقة العمل المسماة "ورقة2" واختر الفصل المطلوب إعداد قائمة له .. من الخلية J1 رابط الكود من هنا

sumdebit: DSum("[debit]","entry","[code] like '" & [code] & "*'")

الاستاذ المحترم / محمد الدسوقي السلام عليكم ورحمة الله وبركاته اللهم بارك مجهود ممتاز و حل رائع ينم عن امكانيات عالية في الاكسيل جعلك الله عون للمشتركين في هذا المنتدا العظيم ( منتدا اوفيسنا ) بارك الله في جميع المنتمين الي هذا الصرح الرائع

السلام عليكم ،،، ممكن تساعدوني في اظهار اشعارات بوساطة الاكسس في اسفل يسار الشاشة او يمينها ، مثل اشعارات الماسنجر او الايميل وذلك عند تحقق شرط معين مثلا لدينا نموذج طلبيات عند وجود طلبيات تاريخ تسليمها اليوم يظهر الاشعار وعند الضغط عليه يمكن فتح نموذج لاظهار هذه الطلبيات.. مع جزيل الشكر