cambiare colore del cell

[dushantha]

ciao a tutti,

io uso questo codice per cambiare colore

If Me.DgvTamponi.Columns(e.ColumnIndex).Name = "Stato" Then
If e.Value IsNot Nothing Then
If e.Value.[GetType]() <> GetType(System.DBNull) Then
If e.Value.ToString() = "ATTIVO" Then
e.CellStyle.BackColor = Color.SeaGreen
End If
If e.Value.ToString() = "ROTTAMATO" Then
e.CellStyle.BackColor = Color.Red
End If
End If
End If
End If

ma io voglio questa funziona in un'altro modo sarebbe la parola ATTIVO invece di scrivere prendesse da una tabella anche i colori
allego anche la tabella