I'm trying to help a friend with his database containing ships, persons, projects, dockyards a.s.f..
He wants to format all the ship names in i subform that has active projects (the boat is in dock) formatted in red and bold
Is it possible to make tekst in a continues sub form red and bold if this code is met:
Function funcVesselsHasActiveProject(VesselID As Long) As Boolean
funcVesselsHasActiveProject = DCount("AVD01ProjectID", "AVD01Projects", "VesselID = " + CStr(VesselID) + " AND " + _
"ClosedDate IS NULL")
End Function
I am aware of the option "conditional formatting" under the format menu, but I'm not a programmer, and my knowledge is limited. Have tryed everything, but no luck so far...
Anyone??
He wants to format all the ship names in i subform that has active projects (the boat is in dock) formatted in red and bold
Is it possible to make tekst in a continues sub form red and bold if this code is met:
Function funcVesselsHasActiveProject(VesselID As Long) As Boolean
funcVesselsHasActiveProject = DCount("AVD01ProjectID", "AVD01Projects", "VesselID = " + CStr(VesselID) + " AND " + _
"ClosedDate IS NULL")
End Function
I am aware of the option "conditional formatting" under the format menu, but I'm not a programmer, and my knowledge is limited. Have tryed everything, but no luck so far...
Anyone??