We geven een zoekterm op en willen de kolomletter vinden waarin deze zoekterm zich bevindt. Laten we zoeken naar:
San Cristóbal
Zet die naam ergens in een sheet (bijvoorbeeld in E4) en vul die naam in onderstaande code in. De MsgBox geeft als antwoord de kolomletter.
Sub Find_Column_Letter()
Set cell = Cells.Find("San Cristóbal", , xlValues, xlPart, , , False)
If Not cell Is Nothing Then
ColLetter = Split(cell.Address, "$")(1)
MsgBox ColLetter
Else
MsgBox "I cannot find that text on this sheet"
End If
End Sub