Mas essas palavras sempre serão três por planilha?
Estarão sempre no mesmo lugar? (nesta mesma coluna)?

O padrão da planilha é o mesmo que este anexo?

O grande problema é esse. Elas não estarão no mesmo lugar e nem sempre em células eo padrão das planilhas são diferentes.

Se fosse em células, poderia utilizar:

Sub Macro1()
        Cells.Replace What:="Maçã", Replacement:="Laranja", LookAt:=xlPart, _
        SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
        ReplaceFormat:=False
End Sub