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

[بوجى]

السادة الافاضل ممكن اعرف ازاى ابدأفى كتاية المعادلات البسيطة مرفق مثال للتجربة Book12.rar

[ياسر خليل أبو البراء]

الأخ الفاضل بوجي

مرحبا بك في المنتدى ونورت المنتدى وشرفت بين إخوانك

بس ينفع تيجي المنتدى من غير طمطم (كدا أنا أزعل ..عموما ابقا سلم لي عليها)

جرب الكود بالشكل التالي

Sub Happy()
    With Range("G1")
        .Formula = "=SUM(A1:E1,A3:E3,A5:E5)+2"
        .Value = .Value
    End With
End Sub

[بوجى]

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

[بوجى]

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

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

[ياسر خليل أبو البراء]

هي تبقا خالتك ولا أختك (ما علينا ) المهم سلم لي عليها

جرب الكود التالي في حدث الورقة ..كليك يمين على اسم الورقة ثم View Code

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Cells.CountLarge > 1 Then Exit Sub
    If Not Intersect(Target, Range("A1:E5")) Is Nothing Then
        With Range("G1")
            .Formula = "=SUM(A1:E1,A3:E3,A5:E5)+2"
            .Value = .Value
        End With
    End If
End Sub

والصق الكود ..

تحياتي

[شوقي ربيع]

السلام عليكم

مجرد رئي

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

ان كنت تريد استخدام العمليات الحسابية من خلال vba فالافضل استخدامها مع Object مثال التكسات في الفورم

تحياتي

[بوجى]

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

[بوجى]

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

[بوجى]

السطرين اللى فوق بتوع دالة IF مش واصلين لى 

[ياسر خليل أبو البراء]

السطر الأول معناه لو كان التعامل مع أكثر من خلية يتم الخروج من الإجراء الفرعي

السطر الثاني يحدد النطاق الذي من خلاله سيتم تفجير الكود ..أي أنه إذا حدث أي تغيير في هذا النطاق يتم تنفيذ باقي الأسطر

[بوجى]

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

[ياسر خليل أبو البراء]

بالنسبة لترتيب العمليات الحسابية ..

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

مثلا لو قلنا 35 + 2 * 3^2 بتسير العملية الحسابية بهذا الشكل ..

35 + 2 * 9 (تم التعامل مع الأس أولا )

35 + 18 (تم التعامل مع الضرب ثانياً)

وأخيرا الجمع فيكون الناتج 53

أرجو أن أكون وفقت في توصيل المعلومة

[بوجى]

شكرا اسناذ ياسر بس انا اقصد التغيير فى كتابة الكود مش فى ترتيب العمليات

[ياسر خليل أبو البراء]

جرب بنفسك وشوف .. غير زي ما إنت عايز (جمد قلبك متخافش ..الموضوع بسيط)

وارفع شعار

حاول وافشل ..حاول وافشل .. ولا تكف عن المحاولة ، فيكفيك شرف المحاولة