An alternative means with Power Query
Code:
let
Source = Excel.CurrentWorkbook(){[Name="Table1"]}[Content],
#"Added Index" = Table.AddIndexColumn(Source, "Index", 1, 1, Int64.Type),
#"Filtered Rows" = Table.SelectRows(#"Added Index", each ([Column1] = "Pears")),
#"Removed Columns" = Table.RemoveColumns(#"Filtered Rows",{"Column1"})
in
#"Removed Columns"