بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
البحث في الموقع
Showing results for tags 'تعديل كود حساب'.
تم العثور علي 1 نتيجه
-
السلام عليكم ورحمة الله الي خبراء الاكواد ارجو تصحيح هذا الكود ومعرفة الخطأ وتصحيح الكود يوجد في الفورم TextBox1 و TextBox2 محتاج الاتى عند كتابة اي رقم في TextBox2 لو كان الرقم الذي تمت كتابتة اكبر من الرقم الموجود في TextBox1 يتم اظهار رسالة للمستخدم تفيد بانه ( لا يوجد رصيد كافي ) وان كان الرقم اقل او يساوي يتم عمل الكود عادي Private Sub TextBox2_Change() Dim WS As Worksheet Set WS = Worksheets("Bill") With Me If Me.TextBox2.Text < Me.TextBox1.Text = True Then MsgBox "لا يوجد رصيد كافي" Else WS.Cells(12, 2).Value = Me.TextBox2.Value TextBox2 = WS.Range("U12").Text End If: End With End Sub
