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

ألغاز إكسيلية (موضوع ترفيهي)


الردود الموصى بها

كودي ليس رائع بل كود هو الأروع ..لأنني إذا قمت بمسح محتويات النطاق لا يتم إضافة كلمة Blank بخلاف كودك ..

عموماً محاولة رائعة منك وتسلم يا كبير..

فين بقا ألغازك يا أبو المقالب ؟! عايزين منك لغز كدا شغل الدماغ النايمة دي

رابط هذا التعليق
شارك

في موضوع الالغاز و بناءً لطلب الاخ ياسر

اريد أول عشرة اعداد يتوفر فيها هذا الشرط

اذا قسمت اي عدد منها على 2, 5,4,3 ,و 6  يكون الباقي 1

طبعاً بواسطة المعادلات

رابط هذا التعليق
شارك

السلام عليكم

الموضوع جميل وشيق
تسلم أخي الحبيب ياسر (أبا البراء) علي الفكرة الحلوة

==============
أخي الغالي / سليم

الفكرة في سؤالك أن الأرقام المتتالية من 2 إلي 6 حاصل ضربهم بالمعادلة Fact سيكون 720

و Fact لمن لايعلم هي إختصار للدالة Factorial أي المضروب باللغة العربية
وهي تعني حاصل ضرب الرقم (في حالتنا 6) من أول 6 إلي 2 (أي 6 × 5 × ... ×2)
صيغتها كالتالي 

=FACT(6)

الجزء التالي من السؤال أول 10 أرقام تقبل القسمة علي ذلك وهذا يعني 720×1 ، 720×2  ، 720×3 ، 720×4 ،،، ، 720×10
مع إضافة 1 لكل من النواتج

إذن ستحتاج إلي 10 صفوف لإظهار الناتج
وتحتاج لمعادلة صفيف كالتالي في عشرة صفوف

{=ROW(INDIRECT("1:10"))*FACT(6)+1}

وستجد النواتج

721
1441
2161
2881
3601
4321
5041
5761
6481
7201
  • Like 1
رابط هذا التعليق
شارك

السلام عليكم

عندك حق أخي سليم

أنا تسرعت بالحل

لم أقرأ جيدا

الحل في المضاعف المشترك الأصغرللأعداد وليس في المضروب ودالة المضاعف المشترك الأصغر هي LCM: Least Common Multiple

إذن الحل كما هو بالسابق مع استبدال الدالة Fact بالدالة LCM

إذن ستحتاج إلي 10 صفوف لإظهار الناتج

وتحتاج لمعادلة صفيف كالتالي في عشرة صفوف

{=ROW(INDIRECT("1:10"))*LCM(2,3,4,5,6)+1}

وستجد النواتج

61
121
181
241
301
361
421
481
541
601

 

  • Like 1
رابط هذا التعليق
شارك

استاذ طارق 

ما رأيك بهذه المعادلة (تستطيع ان تحدد عدد الارقام المطلوب من الخلية D1)

=IF(ROWS($A$1:A1)>$D$1,"",LCM(2,3,4,5,6)*ROWS($A$1:A1)+1)

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

رابط هذا التعليق
شارك

اخواني في المنتدى

لغز جديد من الغاز اكسل الرائعة

لا استطيع الشرح لذلك حملت الملف مع باسوورد لحماية المعادلات

عندما يجد احد ما الحل سوف ابلغكم بكلمة لمرور 

عليك فقط ان تختار عدد الصفوف و عدد الأعمدة

 

جدول متحرك.rar

رابط هذا التعليق
شارك

السلام عليكم 

محاولة للإجابة على لغز جدول متحرك

ضع هذه المعادلة في الخلية B4 ثتم إسحب الى الأسفل والى اليسار

=IF(AND(ROWS($A$1:$A1)<=$J$2;COLUMNS($A$1:A$1)<=$K$2);COUNTA(A$4:A4)+(COUNTA($A4:A4)-1)*$J$2;"")
رابط هذا التعليق
شارك

وعليكم السلام

 

محاولة للإجابة على لغز جدول متحرك

ضع هذه المعادلة في الخلية B4 ثتم إسحب الى الأسفل والى اليسار

=IF(OR(ROW()-3>$J$2;COLUMN()-1>$K$2);"";((COLUMN()-2)*$J$2)+ROW()-3)

تحياتي

  • Thanks 1
رابط هذا التعليق
شارك

 أشكر مروركم الكريم استاذ عبدالله ،لكن الامر لم ينجح

اذ ان هناك عامود زائد الى اليمين 

 

بالفعل 

 

وهذا تعديل للمعادلة

=IF(AND(ROWS($A$1:$A1)<=$J$2;COLUMNS($A$1:A$1)<=$K$2);ROWS(A$4:A4)+(COLUMNS($A4:A4)-1)*$J$2;"")
  • Thanks 1
رابط هذا التعليق
شارك

 صباح الخير للجميع

بالفعل يا استاذ عيدالله هذا هو الحل 

لأن المعادلة صحيحة 100%

الفرق البسيط بيني وبينك في المعادلة هو النقطة فاصلة التي تعمل على جهازك بينما عندي الفاصلة هي التي تعمل

كلمة السر

123**

رابط هذا التعليق
شارك

بسم الله ما شاء الله عليكم

أخي سليم حاصبيا جعل الكبار يدخلون اللعبة ..بارك الله فيك ، ومتحرمناش من الروائع يا كبير

 

مشكور مشاركتك الفعالة أخي وحبيبي طارق محمود ..ولا تحرمنا من ردودك

أستاذي ومعلمي وتاج راسي عبد الله باقشير .. مجرد ردك في أي موضوع دليل على نجاح الموضوع نجاح باهر ، وأصبح الموضوع ليس مجرد موضوع للتسلية كما يظن البعض ، بل إن مشاركاتكم فيه يعد أقصى استفادة يمكن أن نستفيد منها .. لا حرمنا الله منكم

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

بارك الله فيكم جميعاً وجزيتم عنا خير الجزاء ...

وإلى لقاء مع لغز آخر (في انتظار ابن مصر باللغز القادم!!!! )

تقبلوا تحياتي :fff: :fff: :fff:

  • Thanks 1
رابط هذا التعليق
شارك

اخي ياسر

صح النوم 

اين كانت اقتراحاتك للحل / لم ار اي مشاركة 

هو ايه اللي جرى انت مش عايز تحك دماغك حبتين

نفس الموضوع لكن أريد ان تتوزع الارقام على الاعمدة وليس الصفوف يعني: 

1  2  3  4  5

6  7  8  9  10 .... و هكذا   (لغز برسم الجميع) مع انه ليس دوري في اللغز لكن بعد الاعتذار من ابن مصر

  • Like 1
رابط هذا التعليق
شارك

 

تسلم الأيادي أخي الحبيب سليم

بارك الله فيك ...

بالنسبة للملف المرفق في الصف رقم 10 في العمود الأول والثاني ..لم ينطبق الكود رغم الإشارة إليه ..!! بحاول يمين شمال مش قادر أجمع ايه السبب؟

ما رأيك لو كان الكود بهذا الشكل؟

Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Range("A1:B10")) Is Nothing Then
        If IsEmpty(Target) Then Target.Value = "Blank"
    End If
End Sub

اخى ياسر

مشكورا على هذه الفكره الجميله

طبعا سيكون هناك استفده للجميع

وخصوصا من تنوع الاجابات

ولكن هل ينفع هذا الكود فى حالة دمج الخلايا

تقبل تحياتى

رابط هذا التعليق
شارك

بصراحة عقول جبارة ومبدعة يسلم الجميع

رابط هذا التعليق
شارك

لغز اعجبني لفتح ملف اكسل في بعض المواقع

1- الرقم الخامس + الرقم الثالث = 14
2- الرقم الرابع اكثر بواحد من الرقم الثاني
3- الرقم الأول اقل بواحد من ضعف الرقم الثاني
4- الرقم الثاني + الرقم الثالث = 10
5- مجموع الأرقام الخمسة = 30

ماهي الأرقام الخمسه .. بالترتيب طبعا .. الأرقام هي نفسها الشفره اللي راح تفك ملف الأكسل

puzzle(1).rar

رابط هذا التعليق
شارك

الأخ الغالي سليم

بالراحة علينا .انا كنت مريض شوية ، بالراحة علينا ، وبعدين لازم بعد كل لغز تعلن انتهاء اللغز .. وبداية لغز جديد ..بحيث لو فيه حد عنده لغز يبدأ يتفضل بطرحه ..

مش كله ورا بعضه عشان الموضوع يكون أكثر تنظيماً ..

بالنسبة للغزك الأخير ..ممكن توضح اللغز أكثر ، لأني بصراحة تايه ومش عارف الملف اللي تقصده (الخاص بالجدول المتحرك ، ولا بلغز المتبقي 1)

 

الأخ أبو صلاح بارك الله فيك على مشاركتك ، وإن كنت أفضل الانتظار حتى الانتهاء من لغز الأخ سليم .. بس تسلم ايدك وربنا يجازيك خير

رابط هذا التعليق
شارك

 

الأخ الغالي سليم

بالراحة علينا .انا كنت مريض شوية ، بالراحة علينا ، وبعدين لازم بعد كل لغز تعلن انتهاء اللغز .. وبداية لغز جديد ..بحيث لو فيه حد عنده لغز يبدأ يتفضل بطرحه ..

مش كله ورا بعضه عشان الموضوع يكون أكثر تنظيماً ..

بالنسبة للغزك الأخير ..ممكن توضح اللغز أكثر ، لأني بصراحة تايه ومش عارف الملف اللي تقصده (الخاص بالجدول المتحرك ، ولا بلغز المتبقي 1)

 

الأخ أبو صلاح بارك الله فيك على مشاركتك ، وإن كنت أفضل الانتظار حتى الانتهاء من لغز الأخ سليم .. بس تسلم ايدك وربنا يجازيك خير

 

 

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

من اعمالكم سلط عليكم شيل بقى ما قلتلك بلاش هههههههههههههههههههههههه

والبرد اللى عندك ده من السهر طول الليل فى البرد 

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله

اخي ياسر

صح النوم 

اين كانت اقتراحاتك للحل / لم ار اي مشاركة 

هو ايه اللي جرى انت مش عايز تحك دماغك حبتين

نفس الموضوع لكن أريد ان تتوزع الارقام على الاعمدة وليس الصفوف يعني: 

1  2  3  4  5

6  7  8  9  10 .... و هكذا   (لغز برسم الجميع) مع انه ليس دوري في اللغز لكن بعد الاعتذار من ابن مصر

أخي الكريم سليم، يكفي في هذه الحالة وضع المعادلة التالية في الخلية B4 ثم سحبها إلى اليسار وإلى الأسفل:

 

المعادلة:

=IF(AND(ROW($A1)<=$J$2;COLUMN(A$1)<=$K$2);$K$2*(ROW($A1)-1)+COLUMN(A$1);"")

ملاحظة : تطبيق المعادلة في الملف المرفق...

 

بن علية

جدول متحرك.rar

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information