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

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

قام بنشر

أخي الكريم هشام محمد

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

 

الاحتمالات للمثال الأول على سبيل المثال كثيرة جداً ..

فالأرقام  1 ، 163 ، 21 مجموعهم يساوي 185 ، ولو ضربت النسب المذكورة ( 0.05 / 0.10 / 0.25) في الأرقام ستجد مجموعهم يساوي 21.6

وكذلك الأرقام 4 ، 159 ، 22

وكذلك 25 ، 131 ، 29

ويوجد احتمالات كثيرة للغاية ..!!!! فكيف تريد الحل؟

قام بنشر

الاستاذ ياسر الاستاذ سليم شكرا لكما على الردود

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

قام بنشر

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

أخي الكريم، من وجهة الرياضيات لا يمكن حل جملة معادلتين خطيتين من ثلاثة مجاهيل... إذ يجب أن يكون عدد المعادلات مساويا على الأقل عدد المجاهيل... وفي الملف المرفق وضعت طريقة للحل بوساطة معادلات لكن بحجز (وضع) قيمة أحد المجاهيل بطريقة يدوية (قيمة إحدى شرائح الضريبة وقد اخترت شريحة 5%) وهو عمل يشبه عمل Solver أو خاصية "الخلية الهدف" Target Cell ... أرجو أن يكون المطلوب...

بن علية

تركيب معادلة بها ثلاث مجاهيل.rar

قام بنشر
11 ساعات مضت, ياسر خليل أبو البراء said:

أخي الكريم هشام محمد

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

 

الاحتمالات للمثال الأول على سبيل المثال كثيرة جداً ..

فالأرقام  1 ، 163 ، 21 مجموعهم يساوي 185 ، ولو ضربت النسب المذكورة ( 0.05 / 0.10 / 0.25) في الأرقام ستجد مجموعهم يساوي 21.6

وكذلك الأرقام 4 ، 159 ، 22

وكذلك 25 ، 131 ، 29

ويوجد احتمالات كثيرة للغاية ..!!!! فكيف تريد الحل؟

لم تجبني على سؤالي أخي الكريم هشام

يوجد العديد من الاحتمالات .. فكيف سيكون الحل في هذه الحالة؟

انظر للصورة التالية ..هذه الاحتمالات للأرقام 185 و 21.6 ...مع العلم بأن الأرقام المدرجة في مثالك بها كسر بسيط جداً جداً وهو الرقم 83.0000000000001

4	159	22
7	155	23
13	147	25
16	143	26
19	139	27
22	135	28
25	131	29
28	127	30
31	123	31
34	119	32
37	115	33
40	111	34
43	107	35
46	103	36
55	91	39
58	87	40
73	67	45
76	63	46
79	59	47
94	39	52
97	35	53
100	31	54
103	27	55
106	23	56
109	19	57
112	15	58
115	11	59

 

Untitled.png

قام بنشر (معدل)

الاستاذ بن حجى الرابط غير مستجيب برجاء رفع الملف مرة أخرى

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

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

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

أخي الكريم هشام

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

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

 

قام بنشر

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

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

** وسؤالى الأخير هو عن شكل المعادلات المطلوبة وكيف تكون لاستخراج قيمة من ثلاثة مجاهيل؟

  • Like 1
قام بنشر

أخي العزيز هشام محمد شرقاوي

لغة البرمجة تعني المنطق في الطلب ، وقد طلبت أمراً ما ، ويوجد الكثير من الاحتمالات ..فقم بتحديد أي الاحتمالات أقرب إليك والذي يمكنه أن يحل مشكلتك بشكل جذري ..

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

حاول تحدد معايير للاحتمال المطلوب .. ما رأيك مثلاً في أن يكون المجموع (على سبيل المثال 185) يقسم على 2 والناتج أو أقرب ناتج له يكون الأساس في العمل

إذا كنت توافقني هذا الاقتراح فأعلمني بذلك ، وإذا كان لديك فكرة أخرى أو اقتراح آخر فلتتفضل به

وإن شاء الله نصل لحل ..

تقبل تحياتي

Goal Seek To Calculate Tax YasserKhalil Officena.rar

  • Like 1
قام بنشر

 

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

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

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

وجزاكم الله كل الخير على صبركم ونفع بكم .

قام بنشر

أخي الكريم هشام

الأرقام السالبة للأسف تظهر بسبب أن الأرقام التي بهذه الصفوف 413.60 و 70.05 لا يوجد لها احتمالات أرقام صحيحة فيأتي آخر احتمال ..

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

تقبل تحياتي

قام بنشر

جرب التعديل التالي في الكود

Sub Goal_Seek_Tax()
    Dim Opt_a, Opt_b, Opt_c, T As Integer, I As Integer
    Dim A As Single, B As Single, C As Single

    Application.ScreenUpdating = False
        Range("D10:F14").ClearContents
    
        For I = 10 To 14
            Range("E" & I).Formula = "=(C" & I & "-D" & I & "*5%-F" & I & "*25%)/10%"
    
            For T = Int(Range("B" & I).Value / 2) To Range("B" & I).Value
                Range("D" & I).Value = T
                Range("G" & I).GoalSeek Goal:=1, ChangingCell:=Range("F" & I)
    
                A = Round(Range("D" & I).Value, 2)
                B = Round(Range("E" & I).Value, 2)
                C = Round(Range("F" & I).Value, 2)
    
                If A > 0 And B > 0 And C > 0 And A = Int(A) And B = Int(B) And C = Int(C) Then
                    A = Range("D" & I).Value
                    B = Range("E" & I).Value
                    C = Range("F" & I).Value
    
                    GoTo 10
                End If
            Next T
10
            If B < 0 Then
                Range("D" & I).Value = Int(Range("B" & I).Value / 4)
                Range("G" & I).GoalSeek Goal:=1, ChangingCell:=Range("F" & I)
                A = Round(Range("D" & I).Value, 2)
                B = Round(Range("E" & I).Value, 2)
                C = Round(Range("F" & I).Value, 2)
            End If
    
            Range("D" & I).Value = A
            Range("E" & I).Value = B
            Range("F" & I).Value = C
        Next I
    Application.ScreenUpdating = True
End Sub

أرجو أن يفي بالغرض إن شاء الله

  • Like 1
  • Thanks 1
قام بنشر

 

أستاذى الفاضل ياسر : يسر الله لك كل الأمور 

                             وجعلك خليل المصطفى فى الفردوس الأعلى إن شاء الله

                              وجعل بينك وبين النار براءة وعصمة

والشكر موصول للاستاذ بن عليه حاجى وسليم حاصبيا أيضاً

هذا الحل يفى بالغرض إن شاء الله ، وإلى الملتقى والسلام عليكم ورحمة الله وبركاته

قام بنشر

الحمد لله أن تم المطلوب على خير والحمد لله الذي بنعمته تتم الصالحات

أسعدني انك توصلت لحل يرضيك وإن كان الحل لا يرضيني .. ولكن ما دام يرضيك فكفي ..

جزيت خيراً على دعواتك الطيبة المباركة ، ولك بمثل إن شاء الله

تقبل وافر تقديري واحترامي

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