contains

i formel =SØG("par";B3;1)
søger efter par i celle B3,hvis værdien er større end 0, så findes det.

her i VBA, er det A der har værdien
A = InStr(1, Range("B3"), "par")

Jeg forstår ikke det sidste. Det jeg gerne vil er at oprette en række hver gang jeg støder på ordet "par" fx. kan jeg benytte A = InStr(1, Range("B3"), "par") til det?

Jeg forstår ikke det sidste. Det jeg gerne vil er at oprette en række hver gang jeg støder på ordet "par" fx. kan jeg benytte A = InStr(1, Range("B3"), "par") til det?

ja du kan, vi skal bare vide i hvilken/hvilke kolonner, der skal søges i.

Public Sub Test()
    Dim Rk As Long, I As Long, Kl As Integer
    Rk = ActiveSheet.UsedRange.Rows.Count
    For I = Rk To 1 Step -1
        For Kl = 1 To 3    ' kolonne A, B og C
            If InStr(1, Cells(I, Kl), "par") > 0 Then    ' kikker efter par
                Rows(I + 1).Insert ' +1 = under det fundne, fjernes +1 indsættes rækken over det fundne
                Exit For
            End If
        Next
    Next
End Sub

Mange tak, det sparede mig for meget tid. Det vil jeg gerne acceptere som svar :)

;-))

husk at lukke