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

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

من الإمكانيات المذهلة للإكسيل هو استخدام أدواته للرسم، طبعا الموضوع يتطلب صبر أيوب، قمت في هذا المثال برسم خريطة تفاعلية لدولة الإمارات العربية المتحدة، واستخدمت في الرسم add shape/freeform حيث يعتبر الأسهل بالنسبة لي.. إليكم المرفق. uae_population_map.rar وللفائدة هذا مثال فيديو لطريقة رسم الخريطة create map.rar وللمزيد للإمكانيات الهائلة

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

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

السلام عليكم ورحمة الله وبركاته إخواني وأحبابي في الله ارتأيت أن أقدم موضوع بسيط في مضمونه ولكنه مفيد في جوهره حيث سيفيد في أمور أخرى أقدم لكم الدالة MOD وتطبيق عملي عليها لكي تستوعبوا الدالة بشكل جيد الدالة ببساطة شديدة تعطي باقي القسمة .. مثال1 : لو عندك أولاد وجبتلهم 8 تفاحات ، والأولاد نايمين (نوم العوافي) ..فيهم واحد صحي .. يبقا ايه مصير الـ 8 تفاحات ، الحمد لله الـ 8 في خبر كان .. هيتبقى كام تفاحة .. طبعاً ولا تفاحة =MOD(8,1) الـ 8 دول التفاحات ، والواحد (العيل المفجوع اللي أكلهم) ..طبعاً باقي التفاحات يساوي صفر .. لقد التهمهم الوحش الصغير التهاماً الناتج =صفر ************************ مثال2 : لو صحي اتنين من الأولاد على الـ 8 تفاحات ، كل واحد هياكل 4 ، والباقي بردو صفر .. =MOD(8,2) الناتج = صفر ************************ مثال3 : دلوقتي هنفترض إن فيه 3 أولاد هما اللي صحيوا .. والـ 8 تفاحات موجودين .. الأول هياخد 3 والتاني 3 والتالت 2 (دا بقا مش هيسيب إخواته في حالهم إلا لما يدب معاهم خناقة وسلك إنت يا معلم) الباقي من القسمة بعد ما الـ 8 تفاحات اتوزعوا 2 .. لأن الأخير اتعكنن عليه ومخدش غير اتنين فرفض الاتنين (التفاحتين) وفضل إنه يعملها زعلة =MOD(8,3) الناتج = 2 ************************ مثال4 : دلوقتي هنفترض أن 4 اولاد صحيوا والـ 8 تفاحات مودجوين كدا كل واحد هياخد اتنين ويا دار مدخلك شر .. والباقي من القسمة يساوي صفر .. التفاح بح يا بوحة =MOD(8,4) الناتج = صفر ************************ مثال5 والأخير عشان تعبت من العيال دي .. دلوقتي الـ 5 أولاد صحيوا ومفيش أولاد تاني متخافوش (إحنا منظمين النسل) .. الأودلا هيقسموا عليهم التفاح بالعدل طبعاً ..كل واحد هياخد تفاحة وبس .. بس كدا التفاح لسه باقي منه 3 ..(دول بقا من نصيب الأب التعبان الشقيان اللي طالع عينه ليل نهار) يبقا الباقي من القسمة يساوي 3 =MOD(8,5) الناتج = 3 ************************ ممكن آخر مثال نستخدم المعادلة بهذا الشكل وتدينا نفس النتيجة =INT(8/5)*(8-5) معلش طولت عليكم في الأمثلة .. بس الأمثلة دي عشان نفهم كويس الدالة وإزاي يكون الناتج لما يكون عندنا شيء وعايزين نوزعه .. الدالة بتعطينا باقي التوزيعة دي أي باقي القسمة ننتقل لتطبيق عملي على الدالة هنكتب الأرقام التالية في النطاق D7:D12 ... نكتب الأرقام 10 - 3 - 33 - 15 - 18 - 17 (دول 6 أرقام ..فيهم أرقام فردية وأرقام زوجية) والمطلوب إننا نعد الأرقام الفردية والأرقام الزوجية .. أول شيء نروح نحدد النطاق D7:D12 اللي فيه الأرقام المطلوب عدها .. ونروح لصندوق الاسم ونسمي النطاق بأي اسم وليكن Rng .. يمكنك الإطلاع على النطاقات المسماة من خلال التبويب Formulas ثم Name Manager >> نيجي في أي خلية ونكتب المعادلة التالية =SUMPRODUCT(--(MOD(Rng,2)=1)) مش هشرح المعادلة مرة واحدة ..إحنا هنفصصها .. وربنا يعينا إن شاء الله أولاً نفهم الدالة Sumproduct بشكل مبسط على إنها بتتعامل مع مجموعة خلايا مرة واحدة .. مش خلية واحدة بس .. اللي بيسموها صفيف .. صفيف يعني مجموعة من الخلايا .. وطبعاً لأننا هنعد الأرقام الفردية والزوجية داخل نطاق معين من الخلايا فهنستخدم هنا الدالة Sumproduct عشان تجمع النتائج ، وهنعرف إزاي هنجمع بعد شوية لما نحب نفصص شيء بنقطعه حتت ونرميه للقطط .. تمام تمام ..متضحكش !! أيوا زي ما بقولك كدا ..إحنا نقطعه وبعدين نجمعه نمسك الأقواس من جوا الأول ..أول جزء هنشوفه الجزء ده MOD(Rng,2) روح لشريط المعادلات وحدد بالماوس الجزء دا بس ... واشغط بعدها F9 من لوحة المفاتيح ..هتلاقي الإكسيل ترجم لك الجزء دا بس وقالك النتيجة أهي {0;1;1;1;0;1} النتائج دي عددها 6 اللي هي عدد الخلايا اللي بنتعامل معاها .. وظهرت كدا بسبب الدالة Sumproduct الأرقام دي نتائج للدالة MOD اللي فهمنها من شوية يعني الرقم مقسوم على 2 .. فخد رقم رقم وجرب : أول رقم 10 / 2 = 5 يبقا مفيش باقي للقسمة يبقا ناتج الدالة يساوي صفر الرقم 3 لما نقسمه على 2 يتبقا 1 .. كمل إنت باقي الأرقام معنى الكلام ده إن الأرقام الزوجية لما نقسمها على 2 مش هيتبقا شيء ..يبقا ناتج الدالة يساوي صفر أما الأرقام الفردية فناتج باقي القسمة يساوي 1 وهي دي الأرقام اللي ظاهرة أمامي 0 - 1 - 1 - 0 - 1 لحد كدا تمام .. قول تمام يا عبد السلام ندخل على الجزء التاني ..هنحدد من شريط المعادلات الجزء ده {0;1;1;1;0;1}=1 وهنا استخدمنا علامة يساوي .. كأننا بنختبر شرط .. يعني كل رقم من الأرقام على اليسار هل يساوي 1 أم لا ..؟؟ لو كان يساوي واحد يبقا النتيجة TRUE ولو كان يساوي صفر يبقا النتيجة False ... نضغط F9 واتأكدوا بنفسكم من صحة كلامي .. دوس يا معلم متخافش {FALSE;TRUE;TRUE;TRUE;FALSE;TRUE} راجع النتائج بنفسك نيجي دلوقتي ونحدد الجزء ده --({FALSE;TRUE;TRUE;TRUE;FALSE;TRUE}) ونضغط F9 من لوحة المفاتيح ..هنلاقي النتائج بالشكل ده {0;1;1;1;0;1} رجعت الأرقام تاني .. ودي فايدة الشرطتين اللي بعد قوس الدالة Sumproduct ، الشرطتين بيحولوا القيم True و False إلى 1 و 0 .. وفي نهاية المطاق عشان أنا تعبت تصبح المعادلة بهذا الشكل =SUMPRODUCT({0;1;1;1;0;1}) لما نحدد الجزء ده هيطلع لنا الناتج 4 ..أي عدد الأرقام الفردية يساوي 4 لعد الأرقام الزوجية هنغير شيء واحد بس في المعادلة ألا وهو الشرط بدل ما كان 1 نخليه صفر .. ودمتم وأخيراً دعماً لصاحب الموضوع يرجى تحميل الملف (ستمر بسلسلة من الروابط الدعائية حوالي 5 روابط ) .. وطبعاً دا اختياري مش إجباري لأنك ممكن ببساطة تستغنى عن الملف المرفق لأنه بسيط جداَ .. ويمكنك تطبيقه بسهولة جداً ... ولكن إذا كان وقتك يسمح ادعمني بدقيقة واحدة من وقتك حمل الملف من هنا وأخير تقبلوا وافر تقديري واحترامي

السلام عليكم رغم انه ليس من حقي ان اتدخل في مثل هذه المواقف لكنني رأيت انه من باب احقاق الحق الذي يعلى و لا يعلى عليه ، أنني لا بد أن أدلو بدلوي فإن اصبت فمن الله و ان اخطأت فمني و من الشيطان 1: نعلم أنه لا ينال العمل مستحي او متكبر ، فالذي يحرج ( يستحي ) من طرح السؤال او يدخل في نفسه شيئ من الكبر فهذا لن يصل الى نتيجة و أقصد بكلامي هذا أخونا ابو حمادة الذي لمست من كلامه و كأنه يريد مغادرتنا و نحن لا نود ذلك بل نصّر على بقائه . دعني اقولك شيئين اخي ابو حمادة : أولهما : ان الذي يجيب عن سؤال يستفيد أحسن من من طرحه لان ذلك يحفز فيه روح البحث و الاصرار على الوصول للنتيجة المرجوة و بذلك يكون قد اكتسب شيئ ربما لم يكن يعرفه من قبل او صادفه لاول مرة فيكون بهذا قد استفاد احسن من السائل و ثانيهما : لقد حصل لي مثل ما حصل لك او اكثر و في هذا المنتدى بالذات حينما كنت مشتركا باسم آخر و كنت أجيب عن سؤال لاحد الاخوة فرد عليا قائلا : يافلان اما ان تجيب عن اسئلتي و اما ان لا تشارك في ما اسأل رغم انني قضيت وقتا في الوصول للاجابة التي لم ينتبه لها . هل تعمل ماذا كان ردي فعلى ؟ زدت اصرارا في المشاركات له و لغيره 2: و كما جاء في الاثر قول العرب الذين سبقونا :( ما هكذا تورد يا سعد الإبل ) ، و الشاهد من هذا المثل ان النصح لا ينبغي ان يكون بهكذا طريقة و اقصد بذلك اخونا الصقر الذي و الله اعلم ما في النوايا انه لا يقصد الاحراج و ربما هو الآن يتأسف عن ذلك و هذا ما ينبغي ان يكون ، فالرسائل الخاصة تحل الكثير من المشاكل 3 : لقد حاول اخي ابو البراء ان يرمم الموضوع بالود و كسب الطرفين لكنني ارى انه ليس هناك ما يستلزم القلق و الحيرة فسيبقى اخونا ابو حمادة و غيره يسال مايشاء و سيبق اخونا الصقر يجيب و يجيب و يجيب و بدعم من بقية الاعضاء الخلاصة : لم اقصد بكلامي هذا ان احرج احدا او ان اقف الى جانب احد آخر ، فكل منا لا يعرف الآخر إلا من خلال هذه الشاشة و الله من وراء القصد و السلام عليكم

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

اخى الكريم الزبارى جزاكم الله خيرا دائما تاتى بما هو جديد تقبل تحياتى

رائع

تفضل اخى الكريم هذه المعادله ضعها فى الخليه I6 =IF(COUNTA(E6:G6)=0;H6;MAX(E6:G6)) تقبل تحياتى

تفضل اخى الكريم ضع المعادله التاليه فى الخليه E3 =IF(B3=C3;1;DATEDIF(B3;C3;"d")) ملحوظه يجب ان يكون الخلية B3 هى التاريخ الاقدم والخليه C3 هى التاريخ الاكبر ( الاحدث) تقبل تحياتى

ماشاء ألله عليك والشرح الحلو اللي يدخل المخ بدون مقدما (سهل الهضم ) جزاك الله خير

Private Sub UserForm_Activate() For r = 1 To Sheets("ورقة1").[a65500].End(xlUp).Row ListBox1.AddItem Format(Sheets("ورقة1").Cells(r, 1), "dd-mm-yyyy") Next End Sub الكود يكون بهذا الشكل

جزاك الله كل خير يا ابوالبراء على الشرح السلسل والسهل الممتنع بارك الله فيك تقبل تحياتى ياغالى

جميل جدا شرح وافي و كافي و صافي و منو ما في . . . . يلا عوافي

شكرا لك اخى الفاضل استاذ ياسر وباذن الله احاول ان اطبق ما قلته انت هذه نصيحه اعتذ بيها منك تقبل تحياتي من اخوك

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

جزاكم الله خيرا

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

السلام عليكم ورحمة الله وبركاته إخواني وأحبابي في الله أحياناً تقابلنا في بعض المصنفات فلاشات تم إدراجها داخل الإكسيل .. ولذا فكرت في طريقة وبحثت كثيراً لكي أجد طريقة أستطيع بها استخراج الملف الفلاشي المدمج داخل المصنف ليكون الملف مستقل بذاته .. وذلك حتى أتمكن من إدراجه في مصنفات أخرى في الملف المرفق ستجد مصنفين أحدهما باسم Watch ويحتوي على الملف الفلاشي المدرج والمطلوب استخراجه ، والمصنف الثاني يحتوي على الكود الذي يؤدي المهمة بنجاح إن شاء الله تنفيذ الكود : عند تنفيذ الكود يظهر لك نافذة تحدد من خلالها مسار الملف الذي يحتوي الملف الفلاشي المدرج ، وهنا في المثال اسم الملف Watch ، والملف يحتوي على فلاش ساعة ...يمكن استخدامه في أي مصنف بعد استخراجه .. المهم حدد مسار الملف والكود سيقوم بالمهمة ويقوم باستخراج الملف الفلاشي .. ليكون الملف منفضل بذاته عن المصنف .. إليكم الكود المستخدم Sub ExtractFlash() Dim tmpFileName As String Dim FileNumber As Integer Dim myFileId As Long Dim MyFileLen As Long Dim myIndex As Long Dim swfFileLen As Long Dim I As Long Dim swfArr() As Byte Dim myArr() As Byte tmpFileName = Application.GetOpenFilename("MS Office File (*.doc;*.xls), *.doc;*.xls", , "Open MS Office file") If tmpFileName = "False" Then Exit Sub myFileId = FreeFile Open tmpFileName For Binary As #myFileId MyFileLen = LOF(myFileId) ReDim myArr(MyFileLen - 1) Get myFileId, , myArr() Close myFileId Application.ScreenUpdating = False I = 0 Do While I < MyFileLen If myArr(I) = &H46 Then If myArr(I + 1) = &H57 And myArr(I + 2) = &H53 Then swfFileLen = CLng(&H1000000) * myArr(I + 7) + CLng(&H10000) * myArr(I + 6) + CLng(&H100) * myArr(I + 5) + myArr(I + 4) ReDim swfArr(swfFileLen - 1) For myIndex = 0 To swfFileLen - 1 swfArr(myIndex) = myArr(I + myIndex) Next myIndex Exit Do Else I = I + 3 End If Else I = I + 1 End If Loop myFileId = FreeFile tmpFileName = Left(tmpFileName, Len(tmpFileName) - 4) & ".swf" Open tmpFileName For Binary As #myFileId Put #myFileId, , swfArr Close myFileId Application.ScreenUpdating = True MsgBox "Save The Extracted SWF Flash As [ " & tmpFileName & " ]" End Sub وأخيراً تقبلوا وافر تقديري واحترامي حمل الملف من هنا كان معكم أخوكم أبو البراء من منتدى أوفيسنا

السلام عليكم ورحمة الله وبركاته أخي الحبيب ياسر العربي ..أحسنت النشر ...نرجو الله أن يهدي له من يقرأه ويهدي به فيلتزم الأوامر وينتهي عن الزواجر...آمين والسلام عليكم ورحمة الله وبركاته

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

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

جزاك الله خيرا على اعمالك الرائعه_تحياتى

الأخ المبدع أبا البراء جزاك الله خيراً جاري التدقيق في الكود لمحاولة فهمه بارك الله فيك أخي الكريم

جزاك الله كل خير وسلمت يمناك

أخي الكريم من الذي قام بحذف مشاركاتك؟!!! لا تلقي بالتهمة على أحد إلا بعد أن تتأكد من كلامك .. ثم إن الإشراف مسئولية ويجب على المشرف أن يقوم بعملية تنظيم المنتدى ، عشان ببساطة متكونش سبهللة لما يكون فيه موضوع مكرر بيتم حذف المكرر أو دمج الموضوعات ... لما بيكون فيه مشاركة مسيئة بيتم حذفها .. لما بيكون فيه مشاركة في غير محلها بيتم حذفها ... واللي مش عاجبه ممكن يتقدم بطلب شكوى لإدارة المنتدى ، ليتم إقالة المشرف الذي يسيء للأعضاء

السلام عليكم اخ كرار - مصطفى بارك الله بكم وبأمثالكم اللذين يسارعون لفعل الخير جمعنا الله ومن تحبون في الفردوس الاعلى

السلام عليكم ورحمة الله وبركاته ...إخوتي الكرام...نهنئ منتدانا الكريم ونهنئ أنفسنا بعودة أخينا وأستاذنا الجليل عبد الله المجرب ...قدمت أهلاً وسهلاً بين إخوة لك ومحبين ... راجين أن لا يكون غيابك عنا طويلاً بعدها... فلـم تَـجْرِ إِلا جئت فـي الـخير سابقاً *** ولا عدت إِلا أَنت فـي العود أَحمدُ تقبل تحياتنا ومحبتنا ..أستاذاً وأخاً كريماً والسلام عليكم ورحمة الله وبركاته

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

الى التطبيق: الطريقة: . . والنتيجة: . طريقة الاستعلام (وانت عليك الباقي ) : . او او . والنتيجة: . جعفر 355.pme.mdb.zip

وعليكم السلام ابا جودي جرب هذه المعادلة: month([Due_Date]) & "-" & year([Due_Date]) = month(date()) & "-" & year(date()) جعفر

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