[ تمت الإجابة ]سؤال بخصوص الداتا جريد Datagrid

أرسل مثالا فيه الداتا قريد لكي يتم التعديل عليه ...

معذرة أخي هي أداة msflexgrid

المثال مرفق

bbbbb.rar

bbbbb.rar

تفضل أخي عباس ،

	Dim row As Integer
	msflex.col = 3
	For row = 1 To msflex.Rows - 1
	msflex.row = row
		If Val(msflex.Text) < 5 Then msflex.CellBackColor = vbYellow
	Next

:)

بارك الله فيك أخي المبرمج أحمد

لقد كتب نفس الكود ولكن الخطأ كان في كتابتى msflex.backcolor بدلا من من msflex.cellbackcolor

هكذا

If Val(msflex.Text) < 5 Then msflex.BackColor = vbYellow

بدلاً من

If Val(msflex.Text) < 5 Then msflex.CellBackColor = vbYellow

بارك الله فيك أخي