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

السلام عليكم أخى الكريم ( ناصر ) سؤال حضرتك تصورت أن يطرح بقوة بعملى لهذه المعادلة رغم أنه تم الأجابة علية قبل ذلك فى القيم الرقمية دعنا نجيب أولا عن تساؤلك لماذا " zzzzzz " وليس أى حرف أخر ؟ الأجابة ببساطة إننا نلجأ فى بعض المعادلات ومن أهمها بل من أكثرها دالتى ( LOOKUP ) ، ودالة ( MATCH ) إلى إستخدام بديل الشرط برقم أو حرف أو مجموعة أرقام أو سلسلة نصية ( صعبة التحقيق ) حتى تبحث المعادلة عن القيمة أو السلسلة النصية البديلة إذن الأجابة أن سبب إستخدامى لهذه السلسلة النصية لأنها تمثل أكبر سلسلة نصية موجودة فى الأحرف يصعب إيجادها وبالتالى ستبحث المعادلة عن سلسلة نصية أخرى وعادة السلسلة المطلوبة كما نضع مثلا فى القيم الرقمية قيمة كالرقم ( 9.99999999999999E307 ) فهى قيمة صعبة التحقيق فى عملية البحث وبالتالى تنصرف عملية البحث للقيمة الأقرب لتحقيق الشرط وهكذا ................................ألخ أما بخصوص سؤال حضرتك عن بديل المعادلة بمعادلتك أنا والله فكرت فيها لكنى لم أجد فيها البديل الأمثل طالما هناك الأفضل والأدق لماذا ؟ لأن حضرتك هنا سوف تستخدم معادلتان الأولى لجلب القيمة بنائا على الشرط الموجود ثم تغير من قيمة المعادلة لتتجاهل عدم وجود الشرط وتضع بدلا منه المعادلة الأولى المعتمدة على الشرط أعتقد إنها كانت ستكون معادلة فى منتهى الذكاء ، وأنا رفضت عملها عندما فكرت فيها لأنها عاملة مثل المعادلة التى تعتمد على عامل مساعد لتحقيق شرط فطالما هناك الأمثل هنا يجب أن يختفى البديل !!!!!!!!!!!!!! أنظر معى أخى على المثال التىالى الذى يقوم بجلب أخر خلية تحتوى على بيانات ، لعمود يحتوى أرقام وحروف =INDEX(A1:A30;MAX(MATCH({"ZZZZZZZZZZZZZZZZZZZZ",9.99999999999999E+307};A1:A30))) أعتقد الصورة الأن قد أتضحت وظهر جليا كيف يتم إستخدام ماتسائلت علية تقبل تحيات : أخيك

شكرا أخى الحبيب ( عباس ) على مرورك ومشاعرك التى أعرفها وأشعر بها جيدا جزاك الله خيرا وأبعد اللهم عنك المرض أنت وجميع أخوتنا وكل أمتنا الأسلامية تقبل تحيات : أخيك

أختى الغالية ( أم عبد الله ) كما شرفت المرأة المصرية مصر ، فحضرتك فخر لأى أمرأة فى منتدانا هذا ، بارك الله فيكى وزادك من علمه وفضله شكرا : أستاذتى الغالية

أخى الحبيب الغالى ( عباس ) بعد معادلتك الرائعة هذه أسمح لأخيك أن يشاركك هذه المشاركة التى تشرفنى بتواجدى معك ولأثراء الموضوع حل أخر vlookup&if 2.rar

السلام عليكم ماهو افضل اصدار للاكسيل في اصدارات الاوفيس ( اوفيس 2003 - اوفيس 2007 - اوفيس 2010 - اوفيس 2013) اثار هذا الموضوع جدلاً كبيرا معي فأحببت ان اعرض الموضوع عليكم وما دعاني لوضع هذا الاستفتاء هنا هو وجود عدد كبير من الخبراء والاستاتذة والاعضاء لاستعرض آرائكم في ما هو افضل اصدار للاكسيل ( 2003 - 2007 - 2010 - 2013 ) برجاء التصويت عن اقتناع مع علمي بأنه ( لولا اختلاف الاذواق لبارت السلع ) والسلام عليكم

بارك الله فيك أخي أحمد الحاوي 1 ) اسعدني كلامك جداً 2 ) اهو كده منور المنتدي بالعربي (مبارك عليك الاسم الجديد) 3 ) وبالنسبة لكيفية عمل اكثر من شهادة ننتظر ردود استاذنا الفاضل استاذ قنديل لننتهل من بحر علمه ما هو جديد ويضيف الينا من خلال اضائته المشرقة.. 4 ) ( ولعلي كنت افكر بعد كتابتك للمشاركة رقم 6 في هذا الموضوع ان اعمل موضوع يكون شرح وافي من بداية الشهادة الى اخر خطوة فيها ) فالله اسال التوفيق والاعانة..

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

اخى العزيز اليك الملف بعد اضافة صفحة الشهادات وطباعتها شيت خامسة 2014-1.rar

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

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

الاستاذ المبدع/ حمادة عمر جزاك ربي عني خير الجزاء ووفقك لكل خير وزادك علماً ونوراً الملف 100% خدمني كثيرا واستطعت أن أطبع أوراق الغائبين (من بين400 طالب) في ثلاث دقائق فلك جزيل الشكر. الاستاذ المبارك/ محمود الشريف أشكرك على تفاعلك وجهدك وجزاك الله خيرا.

أسف أخى الحبيب ( adge ) الجزء الأول من المعادلة المتعلق ب ( F(ROWS($N$8:$N$41)<=COUNTA($N$8:$N$41) هو شرط لتنفيذ المعادلة الأساسية التى تم شرحها سابقا أما فى حالة عدم تحقيقها ترجع علامة الفراغ الموجودة فى نهاية المعادلة ( "" ) أما هذا الجزء من المعادلة فليس له قيمة فى المعادلة سوى إضافة التسلسل فقط ROW()-7&"-"&" "& تقبل : تحياتى

أخى الحبيب ( adge ) المعادلة معادلة صفيف ومعادلات الصفيف تتعامل مع الأسطر والأعمدة بتوليد مجموعة من البيانات فإذا ماأتفقت مع بعضها البعض تولد عنها أما رقم ( 1 ) أو ( 0 ) ورقم ( 1 ) يعادل ( true ) أو ( false ) فى حالة مقابلتها (0) وهكذا هو أساس عمل دوال الصفيف نعود لمعادلتنا التى نحن بصددها نجدها تتكون من الأتى : INDEX(array, row_num, [column_num]) وهى المعادلة الأساسية ومكونها ( array ) وهو المدى الذى سنقوم بالبحث فية وهو $N$8:$N$41 ولوقمنا بتحليلة كصفيف سينتج الأتى {"";"احمد ابراهيم حسن ابراهيم-";"";"احمد اشرف احمد عبد الرازق-";"";"";"";"";"";"";"";"";"احمد عبده احمد عبده-";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";""} الشرط الثانى فى المعادلة وهو ال (row_num )وهنا ستقوم بجلبة المعادلةSMALL(IF(LEN($N$8:$N$41);ROW($N$8:$N$41)-ROW(N$8)+1);ROWS($N$8:N9))) وستلاحظ حضرتك إنها تتكون من معادلة (small ) ومكونها : SMALL(array,k) ومكون ال ( array ) IF(logical_test;[value_if:true];[value_if_false]) logical_test وهو فى معادلة ( small ) LEN($N$8:$N$41) [value_if:true]; وهو فى المعادلة السابقة ROW($N$8:$N$41)-ROW(N$8)+1) [value_if_false وهو فى المعادلة السابقة ROWS($N$8:N9) وهو فى نفس الوقت شرط ال ( K ) لمعادلة ( SMALL ) بعد هذا كله دعنا نرى مابداخل المعادلة ومايحدث فيها بعد كل هذه الشروط لتحقق المطلوب =ROW()-7&"-"&" "&IF(ROWS({"";"احمد ابراهيم حسن ابراهيم-";"";"احمد اشرف احمد عبد الرازق-";"";"";"";"";"";"";"";"";"احمد عبده احمد عبده-";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";""})<=COUNTA({"";"احمد ابراهيم حسن ابراهيم-";"";"احمد اشرف احمد عبد الرازق-";"";"";"";"";"";"";"";"";"احمد عبده احمد عبده-";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";""});INDEX({"";"احمد ابراهيم حسن ابراهيم-";"";"احمد اشرف احمد عبد الرازق-";"";"";"";"";"";"";"";"";"احمد عبده احمد عبده-";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";""};SMALL(IF(LEN({"";"احمد ابراهيم حسن ابراهيم-";"";"احمد اشرف احمد عبد الرازق-";"";"";"";"";"";"";"";"";"احمد عبده احمد عبده-";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";"";""});{0;1;2;3;4;5;6;7;8;9;10;11;12;13;14;15;16;17;18;19;20;21;22;23;24;25;26;27;28;29;30;31;32;33}+1);ROWS($N$8:N8)));"") ولو حضرتك نسخت هذه المعادلة بهذا الشكل بعد الضغط على ( CTRL+SHIFT+ENTER ) ستجدها تحقق المطلوب أرجو أن يكون الشرح قد أوصل لحضرتك فكرة المعادلة تقبل تحيات : أخيك

أليك أخى الحبيب ماطلبت تقبل تحياتى وضع النسبة بجوار التسلسل.rar

الاخ / awaytat شكرا لك

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

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

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

أخى الفاضل محمد 28 برجاء تغيير اسمكم قمت بتثبيت الموضوع لفترة حتى تعم الفائدة

السلام عليكم الاخ الكريم / واصل بارك الله فيك اليك الكود بالشكل الصحيح ومتم تنفيذه علي ملفك بالمرفقات Sub sama_print() On Error Resume Next For i = 1 To Sheets.Count Sheets(i).Select Sheets(i).[AQ1].Value = "" With Sheets(i) Range("AQ1").Font.ColorIndex = 2 End With For Each cl In Range("a1:ao50") If cl = "غائب" Then [AQ1].Value = "غائب" Next If Sheets(i).[AQ1].Value = "غائب" Then Sheets(i).PageSetup.PrintArea = "a1:ao50" Sheets(i).PrintOut copies:=1 End If Next i Sheet1.Select End Sub شاهد ... وفي انتظار ردك تقبل خالص تحياتي PrintTranscriptTheSeparationOfTheFirst2a11.rar

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

ماهو معيار الأختيار أخى ( الشرط ) لقد قمت بأخذ الأكبر من ثمانية أيام فأكثر فقام بتحقيق المطلوب وأليك المرفق الراسبين بالتسلسل.rar

كيف يمكن التعديل على الكود بدلا من أن يكون عملية الإدخال يدويا لأن الكود لا يتعامل مع المعادلات الموجوده بداخل المدى فالكود لا يقرأ الا الإدخال فقط نفترض أن هناك خليه داخل المدى مرتبطه بخليه خارج المدى وكانت نتيجه الخليه خارج المدى 20 بالتالى تكون الخليه الموجوده داخل المدى 20 هنا لا يتعامل معها الكود

أحبائى الكرام شكرا لكم جميعا .. وشكرا لكل من علق بمشاركة وعفوا سوف نغلق الموضوع لنستمر فى العطاء

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

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

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

أخى الحبيب ( blood ) بصراحة حضرتك بتحرجنى دائما بذوقك العالى وبصراحة أمام هذا الحب لاأجد الكلمات التى تقابلة سوى الكلمات المعتادة والدعاء لك على هذه المشاعر الجميلة تقبل تحيات : أخيك

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

السلام عليكم الاستاذ الغالي / احمد فضيله ... ابو يوسف بارك الله فيك الف مليون شكر علي بالغ الاهتمام الرائع من شخصكم الكريم وجاري التجربة ..... جزاك الله خيرا

السلام عليكم و رحمة الله و بركاته اخي الحبيب الاستاذ الكبير / حماده عمر يمكنك الاستاعنه بمواقع بها قوالب جاهزه على سبيل المثال : http://www.wix.com/ او http://www.weebly.com/ ولي تصميم متواضع على weebly تجده على الرابط التالي : http://aaleraky.weebly.com/ و الله المستعان و السلام عليكم و رحمة الله و بركاته

مرفق ملف به أغلب اختصارات الاكسيل و هو بالانجليزية ، و قد جمعته من فترة و بدأت فى اعداد الملف المعرب و لكن مع تأخري فى ذلك ساضعه نصف معرب به ورقة عمل للاختصارات بالانجليزية و الاخري نصفها معرب ياريت تراجعوه و لو فيه تصليح اخبروني Keys2.rar