اذهب الي المحتوي
أوفيسنا

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

  1. جمال عبد السميع

    جمال عبد السميع

    المشرفين السابقين


    • نقاط

      42

    • Posts

      3724


  2. رجب جاويش

    رجب جاويش

    المشرفين السابقين


    • نقاط

      18

    • Posts

      3492


  3. عبدالله باقشير

    عبدالله باقشير

    المشرفين السابقين


    • نقاط

      7

    • Posts

      4796


  4. محمد ابو البـراء

    محمد ابو البـراء

    05 عضو ذهبي


    • نقاط

      6

    • Posts

      1303


Popular Content

Showing content with the highest reputation on 02/21/14 in all areas

  1. السلام عليكم ورحمة الله وبركاته قائمة Validation مختارة من نتيجة بحث في نفس خلية القائمة لا تحتاج الى ترتيب بيانات البحث وممكن استخدامها في اي ورقة من اوراق الملف المرفق 2003 بحث في خلايا قائمة التحقق من الصحة.rar
    6 points
  2. أخى الفاضل / فراسكو جرب المرفق اكتب كلمة من الكلمات المقصودة فى العمود E ليتم المطلوب هذا كود فى حدث الورقة Private Sub Worksheet_Change(ByVal Target As Range) Set sh = Sheets("ورقة2") LR = sh.Cells(Rows.Count, 1).End(xlUp).Row + 1 If Target.Count > 1 Then Exit Sub Application.ScreenUpdating = False If Not Intersect(Target, Range("E:E")) Is Nothing Then If Not IsEmpty(Target) And Target.Text = "صادر" Or Target.Text = "فوق" Or Target.Text = "وارد" Or Target.Text = "اسفل" Then x = Target.Row Target.Offset(0, -4).Resize(1, 5).Copy sh.Range("A" & LR).PasteSpecial xlPasteValues Rows(x).EntireRow.Delete shift:=xlUp sh.Cells(LR, 1).Value = sh.Cells(LR, 1).Row - 1 LR1 = Cells(Rows.Count, 1).End(xlUp).Row Application.EnableEvents = False For i = 2 To LR1 Cells(i, 1) = Cells(i, 1).Row - 1 Next Application.EnableEvents = True End If End If Application.CutCopyMode = False Application.ScreenUpdating = True Set sh = Nothing End Sub New Microsoft Excel Worksheet1.rar
    4 points
  3. أستاذى ومعلمى الرائع ( رجب جاويش ) طبعا لايفتى ومالك فى المدينة شيتات حضرتك تدرس شرف لى أستاذى أنى أحسنت التخمين أخى الحبيب ( محمد أبو البراء ) نورت المشاركة بكلماتك ومشاركتك تقبل تحيات :أخيك
    3 points
  4. أخى الحبيب / جمال عبد السميع تسلم ايديك وائراء للموضوع هذه معادلة كنت جهزتها =IF(B6="";"";IF(E6="غ";"غائب";IF(OR(E6<$E$5*0.5;D6<$D$5*0.25;D6="غ");"دون المستوى";IF(E6<=$E$5*64.9%;"مقبول";IF(E6<=$E$5*74.9%;"جيد";IF(E6<=$E$5*84.9%;"جيد جدا";IF(E6>=$E$5*85%;"ممتاز";""))))))) حساب التقدير بناء على النسبة.rar
    3 points
  5. تفضل أخى المطلوب وأسف أضطررت لإضافة الحد الأدنى للرسوب لأنى أعتقدت أنه ضرورى لبيان النتيجة تقديرات نتيجة.rar
    3 points
  6. بنفس فكرة أستاذى ( بن علية ) وبعد تسميية النطاق الذي يحتوى على الأسماء ( DATA ) نضع هذه المعادلة أسفل الخلية ( C4 ) ذات اللون البرتقالى وهى معادلة صفيف أى لابد من الضغط على (CTRL+SHIFT+ENTER) =IFERROR(INDEX(DATA; SMALL(IF(ISNUMBER(SEARCH($C$4;DATA));MATCH(ROW(DATA); ROW(DATA)));ROW(A1)));"")
    3 points
  7. يبقى حل حضرتك الأفضل بارك الله فيكى ، واضح جدا إن الواحد محتاج يحفظ جدول الضرب مرة أخرى بارك الله فيكى وتقبل الله جميع أعمالك ولو بفكرة التقريب يبقى الحل فعلا هو حل حضرتك الأصح +15%.rar
    3 points
  8. أستاذى الكبير ( عبد الله بقشير ) أعمال حضرتك كلها كنوز وطريقة أخرى وهو كتابة معادلة =ISERROR(A1) يتم كتابة هذه المعادلة فى ( CONDITONAL FORRMAT ) ثم إختيار لون تعبئة الخط بلون خلفية الصفحة وبذلك يتحقق المطلوب بالطبع هذه المعادلة فى حالة ( OFFICE 2003 )
    3 points
  9. أخى الفاضل الأستاذ ( سعد عابد ) بارك الله فيك وجزاك الله خيرا على مرورك الكريم وتهنئتك الجميلة والرائعة
    3 points
  10. أختى الفاضلة الأستاذة ( أم عبد الله ) شكرا أختى الفاضلة على هذه التهنئة وعقبالك بإذن الله تقبل الله منا ومنكم صالح الأعمال
    3 points
  11. أستاذى ومعلمى الرائع ( رجب جاويش ) ألف مبررررررووووك أستاذى على ترقيتكم المستحقة وعن جدارة متمنيا لحضرتك مزيد من التقدم والرقى فى كل مجالات حياتكم وشكرا أستاذى على تهنئة تلميذكم
    3 points
  12. أخى الحبيب ( ضاحى الغريب ) شكرا على تهنئتكم ومروركم الكريم جعله الله فى ميزان حسناتكم ، وأتمنى من كل قلبى أن أكون عند حسن الظن بى شكرا ، تقبل تحياتى
    3 points
  13. أستاذى ومعلمى وعبقرى الوطن العربى ( عبد الله بقشير ) التهنئة الحقيقية لى أستاذى لأنى سوف أنتمى للجامعة التى ينتمى لها أستاذى الرائع ( عبد الله بقشير ) فهذا وسام على صدرى أتمنى من كل قلبى أن أستطيع المحافظة علية ، وأكون عند حسن ظن أساتذتى العظام شكرا أستاذى وجزاك اللهم عنى خيرا
    3 points
  14. أخى الحبيب الغالى ( عباس ) دائما وأبدا سباق لما هو طيب وجميل ، شكرا أخى الحبيب على جميل مشاعرك وجعلها اللهم فى ميزان حسناتك تقبل شكر أخيك
    3 points
  15. الأستاذ / نجم الدين إبراهيم السلام عليكم ورحمة الله وبركاته إليك الملف لعله المطلوب النتيجة العامة.rar
    2 points
  16. أستاذى الحبيب / عبد الله باقشير أستاذى أنت المنبع الحقيقى للإبداع فى المنتدى حفظك الله وبارك فيك وجزاك عنا خير الجزاء
    2 points
  17. السلام عليكم ورحمة الله وبركاته جئت هنا للتقيم من عمالقة المنتدى وليس لمنافستهم استاذ // جمال عبد السميع [ عبقري وملك المعادلات في الوطن العربي] والاستاذ الحبيب الى القلب استاذ // رجب جاويش اتمنى التقييم اساتذتي وهذا عمل لاثراء الموضوع وبطريقة أخرى لمعرفة التقدير ثم اضفت للمعادلة شرط بسيط وهو عند عدم رصد درجة الاختبار يترك درجة المجموع خالية ودي طبعا لاكتشاف الخطا عند نسيان رصد درجة الاختبار في احد المواد.. حساب التقدير بناء على النسبةbraa.rar
    2 points
  18. السلام عليكم ورحمة الله أخي الحبيب محمود، أكيد يمكن ذلك بالتعديل على المعادلات (معادلات التسميات nam و no و r_r باستعمال الدالة OFFSET لجعل القوائم ديناميكية وتعديل آخر على معادلة Data Validation الخاصة بالقائمة المنسدلة المطلوبة) وتجد كل هذه التعديلات في الملف المرفق... أرجو أني وفّقت في تقريب المفهوم... أخوك بن علية المرفق المعدل : قائمة منسدلة مع تصفية 2.rar
    2 points
  19. أخى الحبيب والصديق الرائع ( محمود الأسيوطى ) كلماتك ومرورك شيئا يشرفنى بارك الله فيك أخى وشكرا على تهنئتك الرقيقة والرائعة
    2 points
  20. السلام عليكم ورحمة الله وبركاته اليوم انا معكم بفكرة جديدة ، لا اعلم ان كانت طرحت من قبل ام لا ولكن ان كانت طرحت!!!! فهيا نجدد افكارنا سويا... ما هي الفكرة ؟! الفكرة اننا عند معرفة حالة الطالب ( الراسب والناجح ) علينا ان نكتب شروط النجاح والرسوب لكل مادة وربما يحدث خطا في كتابة الخلايا ولكن هذه الطريقة لا تحتاج الى ذلك فهي تعتمد على اعمدة التقدير الموجودة عندنا مسبقا و تتم عن طريق اختيار نطاق واحد وهو جميع الخلايا الموجودة في الصف وعن طريق تظليل اول تقدير في المادة الى اخر مادة فيها تقدير.. ومن مميزاتها انها تستخدم مع اي شيت واى عدد من المواد وان كان اكثر من 100 مادة =IF(B5="";"";IF(AND((COUNTIFS(C5:AX5;"غائب")=0);(COUNTIFS(C5:AX5;"دون المستوى")=0));"ناجح";"راسب")) انظر الى المعادلة لو لاحظنا في هذه الدالة سنجد ان االدالة ليس فيها الا نطاق واحد متكرر مرتان وهو c5:ax5 هذا النطاق هو نطاق اول طالب فيه تقديراته من اول مادة الى اخر مادة فبالتالي اذا اردنا استخدامها نستطيع وبسهولة وكل ما علينا الا تغيير هذا النطاق ليتناسب مع عدد موادنا والسلام عليكم ورحمة الله وبركاته دالة بطريقة جديدة لمعرفة حالة الطالب _راسب او ناجح.rar
    1 point
  21. بسم الله الرحمن الرحيم وبه نستعين الساده الزملاء والزميلات السلام عليكم ورحمته الله وبركاته تختلف طرق العمل من جهة الى أخرى فهناك من الجهات التى مازلت تعمل بالطرق التقليدية العقيمة متجاهلة التقدم العلمى والتكنولوجى وهناك من احسن الاختيار فى استخدام هذا التقدم العلمى فى رفعتها وتقدمها نحو انجازالاعمال المكلفون بها باحترافية عاليه وفى ذات الوقت عدم اهدارالوقت فيما لايفيد والى حضراتكم هذا الملف المتواضع وهوعبارة عن مقارنة النسب المئوية المستقطعه من الرواتب بطريقة القرش والجنيه بخانتين وبين الخانه الواحدة ملحوظة هامة بشأن تقريب الاعداد العشرية مالك من استحقاقات فلا تقريب " اقتطاع اول رقمين عشريين دون تقريب " وماعليك من استقطاعات فالتقريب هنا أولى وفقا للقوانين واللوائح وفقنا الله لما يحب ويرضى تقبلوا وافر احترامى وتقديرى .... وجزاكم الله خيرا
    1 point
  22. السلام عليكم أخوتي الأفاضل لدي معادلة لقائمة منسدلة Date Validation وهي جيدة حيث نقوم تلقائيا بإضافة أي بيانات جديدة مدخلة إلى القائمة المنسدلة ( بدون جلب الخلايا الفارغة ) . السؤال هو هل يمكن ادخال تعديل عليها بحيث ( عند وضع حرف ( م ) مثلا يقوم بتصفية كل الأسماء التي تبدء بحرف ( م ) لتسهيل الإختيار و اختصار الوقت في البحث وخصوصا إذا كانت بيانات القائمة كثيرة الكود هو : =OFFSET('Data Entry'!$L$1,0,0,COUNTA('Data Entry'!L:L),1) الملف في المرفقات ولك جزيل الشكر
    1 point
  23. لى ملحوظة صغيرة أخى الحبيب ( محمد ) ألا يمكن إستخدام ( COUNTIFS ) واحدة لكل هذه الشروط لأن دالة COUNTIFS مكونها كالأتى: COUNTIFS function COUNTIFS(criteria_range1, criteria1,criteria_range2, criteria2, ...) ويمكن إستخدام دالة ( COUNTIF) كبديل ليها لتحقق نفس الهدف بالشكل التالى =IF(B5="";"";IF(COUNTIF(C5:AX5;"غائب")+COUNTIF(C5:AX5;"دون المستوى")=0;"ناجح";"راسب")) أرجو أن أكون وفقت لأن الفكرة فكرة حضرتك وحضرتك الأقدر بالحكم عليها وتطبيقها كما بالمرفق ، ولم أستطع تطبيقها على ( OFFICE 2007 ) لأنه ليس على جهازى ولووصلت الفكرة يكون الفضل لحضرتك تقبل تحيات : أخيك دالة بطريقة جديدة لمعرفة حالة الطالب _راسب او ناجح.rar
    1 point
  24. أخى الحبيب / محمد أبو البراء فكرة رائعة بجد فيها ابتكار وابداع تسلم ايديك
    1 point
  25. أتمنى يكون المطلوب وفقا لما فهمت وعلى فكرة المعادلة تم عملها لتوافق ( OFFICE 2003 ) أمنا المعادلة التى يجب أن تطبق هذه المعادلة والفرق بينهم فقط فى أضافة دالة ( IFERROR ) لتخطى الخلايا التى تعود بالخطأ لذلك ستكون معادلتك كالأتى :والتطبيق مثلما هو موجود فى المرفق بالضبط: =IFERROR(INDEX(TBL; SMALL(IF(($H$1=NUM); ROW(TBL)-MIN(ROW(TBL))+1; ""); ROW(A1));COLUMN(A1));"") تقبل تحياتى ترحيل حسابات.rar
    1 point
  26. اخى الجموعى تم التعديل على المشاركه رقم12 جرب المرفق فى المشاركه12
    1 point
  27. أخى الفاضل :SALAMA F42 أولا : لك منى دعوة طيبة لتغيير اسم الظهور الى اللغة العربية ليسهل التواصل بيننا ( طبقا لسياسة المنتدى ) ثانيا : برجاء فتح موضوع جديد تطلب فيه ما تشاء مع ارفاق مله توضح به ما تريد
    1 point
  28. الاخ محمد ابو البراء فارس اخر لسباق الخير
    1 point
  29. جزاك الله خيراً أخي الحبيب واستاذي // رجب جاويش الفضل لله ثم افكاركم التى جعلتنا نفكر باسهل الطرق كيف نصل للمطلوب بالاضافة الى محاولة تسهيل المعادلة بقدر الامكان لتعليمها لمن يريد.. وشكراً لك استاذي على تقيممك الذي اجعله وساما محفور على صدري.. :fff: :fff: (ولا انسى كلماتك في اول مشاركاتي وظنك بي وتشجيعك الدائم ) وهذه بعض كلماتك اخي الحبيب واستاذي الفاضل
    1 point
  30. أخي الكريم محمد جزاك الله كل الخير اخجلتني بتواضعك لك خالص شكري وتقديري
    1 point
  31. وعليكم السلام ورحمة الله وبركاته استخدم الكود التالي Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean) TextBox1 = Format(TextBox1, "000 000.00") End Sub مع تحياتي
    1 point
  32. الله عليك أخى محمد أبو البراء هذا هو التفكير خارج الصندوق زى ما بيقولوا تسلم أفكارك
    1 point
  33. أخي الفاضل استاذ // الجموعي بارك الله فيك على هذا الشرح الاكثر من رائع واصل اوصلك الله للخير وننتظر المزيد وظني انه ميلاد عضو محترف في منتدانا
    1 point
  34. السلام عليكم ورحمة الله وبركاته ولاثراء الموضوع وسعادتي انني بين الكبار استاذي الحبيب // مجدي يونس والاستاذة الفاضلة // أم عبد الله والاستاذ الحبيب الى القلب الاستاذ // رجب جاويش احب ان اعطي حل بطريقة أخرى يعتمد على عمودي التقدير =IF(B7="";"";IF(OR(F7="دون المستوى";J7="دون المستوى";F7="غائب";J7="غائب");"راسب";"ناجح")) النتيجة العامةbraa.rar
    1 point
  35. الاخت ام عبدالله جذاك الله خير سباق الاخوه نحو الخير والله النت اصبح رخم جدا وسرعة بطيئة لنا الله
    1 point
  36. الأستاذ / الجموعي السلام عليكم ورحمة الله وبركاته جزاك الله خيراً على هذا الموضوع المميز والشرح الممتاز.
    1 point
  37. أخى الفاضل / نجم الدين ابراهيم جزاك الله كل خير
    1 point
  38. السلام عليكم تفضل أخى النتيجة العامة.rar
    1 point
  39. أشكرك جداا على الشرح ... كيف أظهر مجموعة االمطور في أكسل 2013
    1 point
  40. السلام عليكم ورحمة الله وبركاته الاخ العزيز الجموعي جزاك الله خيرا موضوع رائع وشرح ممتاز وفقك الله واعطاك الصحة والعافية تقبل فائق احترامي وتقديري
    1 point
  41. السلام عليكم ورحمة الله أخي الكريم عبد الرحمن، تم عمل المطلوب بالمعادلة نفسها (استعمال الدالة OFFSET).... أخوك بن علية المرفق : تجربة بعد التعديل.rar
    1 point
  42. السلام عليكم ورحمة الله وبركاتة اعضاء المنتدى الحبيب مساهمة بسيطة لطريقة عمل احصاء للفصول بالمعادلات عدد الناجحين والراسبين والدور الثان طبعا الشرح لشخص مبتدئ ولكن محاولة طبعا الكنترول من أعمال الكبير الاستاذ دغيدى اكرمة الله ارجو أن ينال الشرح رضاكم احصاء فصول ناجح وراسب ودور ثان.rar
    1 point
  43. بسم الله الرحمن الرحيم قوالب إكسيل للتحميل تشمل الحسابات الخاصة بالشركات التجارية _ اليومية الامريكية _ المخازن _ العقارات _ المرتبات ما يتعلق بها _ أرصدة حسابات البنوك _ مذكرة التسوية _ التحليل المالى للقوائم المالية _ كشف حساب و أعمار الديون ......... التحميل
    1 point
  44. اخى الجموعى لك منى تحيه طيبه للاستاجبه والاتزام بقواعد المنتدى وتغير اسمالظهور الى اللغه العربيه بارك الله فيك تم عمل المطلوب على قدر الفهم ارجو تجربه الملف الملف شهادة مدرسية+المطلوب.rar
    1 point
  45. أخى الحبيب / محمد أبو البراء شكرا جزيلا أخى الحبيب على هذه الكلمات الطيبة وجزاك الله كل خير فكرتك ذكيه وجميلة طبعا
    1 point
  46. أخوي محمد الأسيوطي، هو هذا يا أمير، الله يسعدك دنيا وآخرة، أسأل الله أن يجزيك عني كل خير، شوي وأبكي، اللهم لك الحمد، خلاص نجح مشروعي لملف رائع، أسأل الله لك كل خير، الحمد لله
    1 point
  47. أخى العزيز الفاضل الاستاذ // عبدالله المجرب السلام عليكم ورحمته الله وبركاته فيما لايغضب شرع الله فالمنتدى عامربتلك البرامج ومثالا.... لا حصرا فك حماية شيتات ملفات الإكسل بجمع إصداراتها وامتداداتها http://www.officena.net/ib/index.php?showtopic=29972&hl= والمطلوب رجاءا هو برنامج لكسرالحماية مع معرفة الرقم السرى أو كلمة المرورلتفعيله مرة أخرى بعد انجازالمهام المكلفون بها ........ وجزاكم الله خيرا
    1 point
  48. الأخت الكريمة/ الروضة الشريفة السلام عليكم ورحمة الله وبركاته الحمد لله الذي وفقني إلي الحل الذي أردتموه - وشكرا علي الإطراء الجميل تقبلي تحياتي
    1 point
  49. تم تعديل فى برنامج عمل الشهادات لإى مرحلة ليقوم بعمل نوعين من الشهادات 1 - الأولى تشمل درجات الشيت مكتمل وهذه تصلح للأخوة اللذين يتعاملوون مع عدد من المواد كبير نسبيا 2- الثانية وهى شهادات تقترب من شهادات المرحلة الإعدادي والإبتدائية وتشمل عدد أقل من المواد 3- تم إضافة معادلة المجموع الموجود فى برنامج ( ظهور النتيجة ) لجمع المجموع فى الشهادة وذلك بكتابة كلمة ( مجموع ) فقط على حسب ترتيبة فى مواد كل مرحلة فى ( عمود كتابة المواد ) فى صفحة التعبئة وستلاحظ عند كتابتها فى هذه الصفحة على حسب ترتيبة لديك فى المواد أن عمود المجموع فى شيت الدرجاتقد تم تغيير لونة إلى اللون الرصاصى حتى لاتكتب به شئ 4- كل مجموعة من الشهادات مزوذة بكود للطباعة جاهز لطباعة ( 3 ) شهادات فى كل مرة 5- عمل رابط لأظهار شيت المجموع لمراجعة المجموع بنائا على طلب بعض الأعضاء وهو للمراجعة فقط وليس للكتابة لأنه يحتوى على معادلات الشهادة وفى النهاية أسألكم الدعاء عمل الشهادات لأى مرحلة الأصدار الثانى.rar
    1 point
  50. تحتاج الى تسمية نطاق الرموز مثلا انا سميته RngCode وهذه معادلة البحث لقاعدة التحقق من الصحة =OFFSET(RngCode;MATCH(B2;RngCode;0)-1;-1;COUNTIF(RngCode;B2)) المرفق 2003 قائمة منسدلة مفلترة3.rar
    1 point
×
×
  • اضف...

Important Information