المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
لدى DataGrid متصلة ب Adodc المرتبط بأحد جداول قاعدة البيانات
وأريد تظليل أحد السجلات فى الDATAGRID
مثلآ تظليل السجل الرابع
أو مثلآ تظليل السجل الحالى
أو مثلآ تظليل السجل الذى فيه قيمة الحقلNAMEE تساوى"أحمد"
أو أى مثال آخر
ولكم ألف شكر
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
27-07-16, 05:48 PM
(آخر تعديل لهذه المشاركة : 27-07-16, 06:19 PM {2} بواسطة اسلام الكبابى .)
ان كانت هذه الأمثلة الكثيرة جعلت السؤال غير مفهوم
أريد كود تظليل السجل الرابع
ولكم ألف شكر
المشاركات : 551
المواضيع 13
الإنتساب : Sep 2013
السمعة :
94
الشكر: 6399
تم شكره 8580 مرات في 478 مشاركات
السلام عليكم
اخي استخدم flexgrid
بالتوفيق
محاسب / أحمد عبد العليم
الى اللقاء ان شاء الله
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
لم يكتب لى الأخ/ ahmedabdelaliem كود تظليل السجل الرابع باستخدام ال flexgrid
ولكم ألف شكر
المشاركات : 114
المواضيع 55
الإنتساب : Apr 2015
السمعة :
2
الشكر: 2
تم شكره 150 مرات في 53 مشاركات
10-08-16, 07:35 PM
(آخر تعديل لهذه المشاركة : 10-08-16, 07:41 PM {2} بواسطة scsi7000 .)
On Error GoTo ss
Dim i As Integer
Dim mydate As Date
mydate = Format(Date, "dd/mm/YYYY")
With MSFlexGrid1
For i = 1 To MSFlexGrid1.Rows - 1
.Row = i
.Col = 3
If MSFlexGrid1.TextMatrix(i, 3) <= CDate(mydate) Then
.CellFontBold = &HFF&
.CellBackColor = vbRed
Else
.CellFontBold = &HC000&
.CellBackColor = vbGreen
End If
.Col = 3
Next i
End With
ss:
0
السلام عليكم اخي انا وضعت لك كود في الاعلى استخدمه لتلوين الفلكس للشخص المنتهيه اجازته
ورقم 3 هو الرابع لان ترقيمه يبدأ من الصفر
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
بارك الله فيك
وليتك تعرف كود شبيه عند استخدام ال DATAGRID
ولكم ألف شكر
المشاركات : 2,008
المواضيع 58
الإنتساب : Oct 2014
السمعة :
1,005
الشكر: 31833
تم شكره 22865 مرات في 2187 مشاركات
أهلا أخي الكريم , هذا مثال يوضح ماتريد .
الملفات المرفقة
تظليل صف محدد في الداتا قريد.rar (الحجم : 10.35 ك ب / التحميلات : 165)
المشاركات : 703
المواضيع 129
الإنتساب : Sep 2013
السمعة :
12
الشكر: 428
تم شكره 777 مرات في 196 مشاركات
ألف ألف مليووووووووووووون شكر
أيها الأستااااااااااااااااااذ الكبيييييييييييييييير
آآآآسف
[b]أيها الأستااااااااااااااااااذ الوحيد
[/b]