تنسيق شرطى على الارقام

[واكل]

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

وشكرا

New Microsoft Access Database (2).accdb

[واكل]

ارجو الرد

[واكل]

يامنتدانا الكرام عايز حل

[AlwaZeeR]

تفضل:

باستخدام الوحدة النمطية التالية:

Public Function DBFormat(SField As String) As Integer
Dim DbCount As Integer
DBFormat = 0
DbCount = DCount("[num]", "table1", "[num] = " & SField)
If DbCount > 1 Then DBFormat = 1
End Function

واستدعائها ضمن التنسيق الشرطي للحقل هكذا:

DBFormat([num])>0

مع تغيير التنسيق الى احمر كما في الصورة

 

New Microsoft Access Databasewazzzz.accdb

[واكل]

شكرا جزيلا اخى الكريم مااعرف ايه اقول لك غير جزاك الله كل خير لكن اخى الكريم مانفع اكثر من لون صحيح