Gennemløb af kolonne i Excel

Public Sub tjek()
For Each c In Sheets("Ark1").Range("A:A") ' ark og kolonne
If c = "" Then Exit Sub ' hopper ud hvis der er en tom celle
If c.Value = "hest" Then ' ret hest til din søgning
c.Value = "Ko" ' ret til det der skal ske
End If
Next c
End Sub

Takker det ser ud til at virke, så smid et svar. Hvordan håndteres IgnoreCase i VB ?

IgnoreCase, hvad mener du, du skriver VB, dette er VBA

I java kan man ignorere om det er store eller små bogstaver d.v.s Hest, HEST eller hest erstattes af Ko. kan man det i vba

If ucase(c.Value) = "HEST" Then ' Ucase gør at den læser alle bogstaver som store

den modsatte er Lcase

ok, hvordan kan det være at c ikke skal defineres ? Den henviser til en celle, men havde forventet at den skulle defineres