السلام عليكم ورحمة الله وبركاته
اريد كود لحذف كل السطور الفارغة فى الجرد وتترك السطور التى بها بيانات
واعادة ترقيم الجرد
بحث فى المنتدى ولم اجد شئ بهذا الخصوص
وجزاكم الله خيرا
-
لأنك لم تحدد مصدر البيانات في الـ
DataGridView ففد استبعدت الربط بقاعدة البيانات.
كود :
' ملاحظة: فقط في حالة عدم الربط مع قاعدة بيانات
' الإحتفاظ بقيمة خاصية إمكانية الإضافة
Dim AllowUserToAddRows As Boolean = Me.DataGridView1.AllowUserToAddRows
' تعطيل خاصية إمكانية الإضافة
Me.DataGridView1.AllowUserToAddRows = False
' المرور على الأسطر ونختبر خلايا محددة إذا كانت فارغة ما عدا خلية الترقيم ونقوم بحذفها
For i = Me.DataGridView1.Rows.Count - 1 To 0 Step -1
If Me.DataGridView1.Rows(i).Cells(1).Value = "" _
And Me.DataGridView1.Rows(i).Cells(2).Value = "" _
Then Me.DataGridView1.Rows.RemoveAt(i)
Next
' المرور على الأسطر لترقيمه من جديد في خلية محددة
For i = 0 To Me.DataGridView1.Rows.Count - 1
Me.DataGridView1.Rows(i).Cells(0).Value = i + 1
Next
' إعادة قيمة خاصية إمكانية الإضافة
Me.DataGridView1.AllowUserToAddRows = AllowUserToAddRows
جزاك الله خير ..
كود 10/10
حكاية الترقيـــــــم في خلايا الجريدفيو بطريقتك هذه خطأ ..
لأن الخلايا أساسا مخصصة لبيانات أنت عايزها
أما لو عايز ترقم فلازم تستخدم رؤوس السطور :
PHP كود :
For Each R As DataGridViewRow In DataGridView1.Rows
R.HeaderCell.Value = (R.Index + 1).ToString
Next
يعطيك العافيه .