DateGridViewの背景色をセルの値によって変更

Private Sub dgvSHITEKI_CellFormatting(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewCellFormattingEventArgs) Handles dgvSHITEKI.CellFormatting
'セルの列を確認
If dgvSHITEKI.Columns(e.ColumnIndex).Name = "項目別合否" AndAlso TypeOf e.Value Is String Then

'セルの値により、背景色を変更する
If e.Value = "合格" Then
e.CellStyle.BackColor = Color.LimeGreen
ElseIf e.Value = "条件付合格" Then
e.CellStyle.BackColor = Color.Yellow
ElseIf e.Value = "不合格" Then
e.CellStyle.BackColor = Color.Red
End If
End If
End Sub