Excel：重命名相似的值？

Question

我有一张包含供应商名称的数据，如下所示。问题是名称的拼写略有不同。

 Column F
    GB - General Mills Uk
    General Mills Uk
    General Mills
    Eurostock Foods
    EurostockFoods
    INT - Eurostock foods

无论如何，我可以将这些供应商重命名为匹配：

Column F
General Mills
General Mills
General Mills
Eurostock Foods
Eurostock Foods
Eurostock Foods

说实话，我甚至不知道从哪里开始，虽然使用vba我会想象它会是这样的：

循环遍历F列中的每个单元格，看看上面的单元格是否与当前单元格一样，如果为true，则将当前单元格重命名为上面的单元格...

    Sub FindMatchingValue()
        Dim i as Integer, intValueToFind as integer
        intValueToFind = ActiveCell.Offset(-1,0).Value
        For i = 1 to 500    ' Revise the 500 to include all of your values
            If Cells(i,1).Value Like intValueToFind then 
                Cells.Value = ActiveCell.Offset(-1,0).Value
                Exit Sub
            End If
        Next i

End Sub

这不起作用，我需要一些帮助来实现我所需要的。我是vba的新手，所以任何帮助都会非常感激。