Function myFind(selle As Range) Dim c Application.Volatile For Each c In Range("SH") If c = selle Then myFind = c.Offset(0, -1) Next If myFind = 0 Then myFind = "" End Function
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.