Ciao,
in un report voglio formattare un campo do un determinato record se accade una certa condizione.
Il codice sembra ok ma la formattazione inspiegabilmente prende TUTTI i record.
Questo il codice:
Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
Dim RecordSt As Recordset
Dim db As Database
Set db = CurrentDb()
stringSQL = "SELECT Capo_Team FROM Consulenti WHERE Cognome & ' ' & Nome LIKE '*" & Replace(Me.Consulente, "'", "''") & "*';"
Set RecordSt = db.OpenRecordset(stringSQL)
If RecordSt("Capo_Team") = True Then
Me.Consulente.FontWeight = 700
End If
End Sub
Grazie