excluir linha com base na condição

Eu estava esperando que alguém pudesse ajudar com este pedaço de código. Eu estava tentando excluir a linha inteira se eu encontrar o texto 'FemImplant' na coluna A. A parte complicada é que este texto é parte de uma sentença vinculada por '$0$#39;. Então eu preciso do código para analisar o conteúdo da célula antes de '$0$#39; e ver se combina com 'FemImplant' e excluir essa linha. Isso é o que eu tenho até agora, mas não está funcionando.

Dim cell As Excel.Range
 RowCount = DataSheet.UsedRange.Rows.Count
 Set col = DataSheet.Range("A1:A" & RowCount)
 Dim SheetName As String
 Dim ParsedCell() As String

 For Each cell In col

 ParsedCell = cell.Value.Split("$")
 SheetName = ParsedCell(0)

 If SheetName = "FemImplant" Then
 cell.EntireRow.Delete Shift:=xlUp

 End If

Próximo

questionAnswers(1)

yourAnswerToTheQuestion