تعديل في كود جمع قيم تكست بوكس

[ضياء 2]

السلام عليكم الاساتذة الافاضل فضلا من كرمكم تعديل كود " المطلوب لو وجدت أي قيمة في تكست بوكس2 يجمع  قيمة  تكست بوكس1 فقط "

wo.xlsm

[عبدالفتاح في بي اكسيل]

بكل  بساطة الغي  عملية  الجمع  

اذا  كنت  تريد  تجاهل  التيكست  بوكس  2      فلماذا  اصلا  تقوم  بعملية  الجمع  ! 

التيكست بوكس 3   ماذا  سيجمع ؟

السؤال  غير  منطقي  على  الاطلاق  الا  اذاكان  لديك  قصد  أخر فعليك  توضيحه .

[ضياء 2]

شكرا استاذنا على تفاعلك " في الشيت عندي عدد 8 تكست بوكس  انا اختصرت عدد التكست بوكس في المطلوب

قيمة تكست بوكس1 + قيمة تكست 2 = الجمع تكست بوكس 3

[عبدالفتاح في بي اكسيل]

لا ارى  اي  شيء جديد  اضفته 

 اذا  كان  لديك  8  تيكست بوكس  حينها  ما  عليك  الا  استبعاد  تيكست بوكس2

اين  الصعوبة  في  هذا؟

[ضياء 2]

انا لم اكمل الشرح في الاول "المطلوب لو وجدت أي قيمة في تكست بوكس2 يجمع  قيمة  تكست بوكس1 فقط ولم تجد قيمة في التكست بوكس2 يجمع تكست1 ،تكست 2

[عبدالفتاح في بي اكسيل]

اقتباس

انا لم اكمل الشرح في الاول "المطلوب لو وجدت أي قيمة في تكست بوكس2 يجمع  قيمة  تكست بوكس1 فقط ولم تجد قيمة في التكست بوكس2 يجمع تكست1 ،تكست 2

هذا يعني  في  كل  الاحوال  يجب  ان  تكون  قيمة  التيكست بوكس 2 =0 

نرجع  الى  نقطتنا  الاولى  وهو  انه  لا  داعي  لعملية  الجمع !

لا يوجد  اي  فائدة  من التيكست بوكس2 ، فيما  تستخدمه؟

اعذرني  حاولت  ان  افهم  ما  المغزى  من ذلك  ربما  احد  الاعضاء  يفهمك 

تحياتي

[حسين مامون]

في 12‏/12‏/2022 at 19:58, ضياء 2 said:

السلام عليكم الاساتذة الافاضل فضلا من كرمكم تعديل كود " المطلوب لو وجدت أي قيمة في تكست بوكس2 يجمع  قيمة  تكست بوكس1 فقط "

wo.xlsm 22.9 kB · 2 downloads

 جواب على قد سؤالك هو هذا

Private Sub TextBox2_Change()
If TextBox2 > 0 Then
 TextBox3.Value = Val(TextBox1)
 End If
End Sub

 

[ضياء 2]

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