title: Delete row based on partial text
body: <p>I am trying to delete the entire row if I find the text 'FemImplant' in column A.</p>
  
  <p>The text is part of a sentence linked by '$'. I need to parse the cell content before '$' and see if it matches 'FemImplant' and delete that row.</p>
  
  <p>This is what I have so far. </p>
  
  <pre><code>Dim cell As Excel.Range
  RowCount = DataSheet.UsedRange.Rows.Count
  Set col = DataSheet.Range("A1:A" &amp; 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
  Next
  </code></pre>