Error en datagrid.

Qué tal amigo. Desde ya que estoy muy agradecido porque pertenezcas al foro. Espero puedas ayudarme. Resulta que traigo datos de una DB a un datagrid para que luego desde este, al hacer clic me pase a otro form y poder editar datos. En el datagrid tengo 9 columnas, la novena es el estado de un socio. Lo que quiero hacer es que si ese socio tiene como estado el texto "Fallecimiento" no me permita editar. Tengo esto y no me anda. No sé porqué. Puedes ver porque no anda?? Saludos.

Private Sub DtaSocios_Click()
If dtaSocios.Columns.Item(8).Text = "Fallecimiento" Then
MsgBox "Voluntario Fallecido. Imposible modificar", vbInformation, "Gestión Voluntarios"
Exit Sub
Else
Call EditaSocios
Unload Me
end If
End Sub