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

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

قام بنشر

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

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

oficna 2022.xlsm

  • أفضل إجابة
قام بنشر

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

Me("txtQty" & AD) = Format(Sheet1.Cells(i, 3), "0.00")

ولا أدري ما سبب تكرار سطور الكود

يكتفي بأول أربعة فقط

Private Sub CommandButton1_Click()
For i = 8 To 40
If Sheet1.Cells(i, 1) = Val(Me.TxtSearch) Then
AD = AD + 1
Me("txtItem" & AD) = Sheet1.Cells(i, 2)
Me("txtQty" & AD) = Format(Sheet1.Cells(i, 3), "0.00")
Me("txtPrice" & AD) = Format(Sheet1.Cells(i, 4), "0.00")
Me("txtTotal" & AD) = Sheet1.Cells(i, 5)
End If
Next i
End Sub

بالتوفيق

  • Like 2
زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information