"Oversættelse" af VBA

Jeg har "arvet" et excel ark, hvor jeg ikke kan finde ud af hvad VBA koden gør. Jeg har forsøgt at søge lidt på nettet, men jeg synes ikke at jeg bliver klogere.

Er der en der vil hjælpe med at "oversætte" nedenstående VBA-kode til noget almindelige excel-brugere kan forstå? :-)

    If Trim(FindString) <> "" Then
        With ThisWorkbook.Sheets("XXXXX").Range("D:D")
            Set rng = oRange.Find(What:=FindString, _
                            After:=.Cells(.Cells.Count), _
                            LookIn:=xlValues, _
                            LookAt:=xlWhole, _
                            SearchOrder:=xlByRows, _
                            SearchDirection:=xlNext, _
                            MatchCase:=False)

På forhånd tak for hjælpen.