Hallo zusammne,

das untere Makro sucht nach dem wert x das sich im range A im sheet ws befinden im sheet wp range A.. Wenn es diesen Wert in sheet wp nicht finden, sucht wird nach dem Wert  y dass sich im range B im sheet ws befinden im sheet wp range B. Und danch kommt der wert z im range C. Ich würde jedoch die werte in C und D im sheet ws befinden kollektiv im sheet wp range C und D suchen, so dass beide werte in diesen ranges zutreffen müssen. Ich weiss nicht, wie ich das in das makro einbauen kann.

danke euch erstmal für anregungen 

Dim cell As Range
r = 2
number_of_r = 30
ru = 1
number_of_ru = 30


For Each cell In ws.Range("A" & r & ":A" & number_of_r)
For I = 0 To 2 'Column Offset form A to C
      Set foundValue = wp.Sheets("ABC").Range(Cells(ru, I + 
1), Cells(number_of_ru, I + 1)).Find(cell.Offset(0, I).Value)
    If Not foundValue Is Nothing Then
        wp.Sheets("ABC").Rows(foundValue.Row).Columns("E:AB").Copy
        ws.Range("G" & cell.Row).PasteSpecial
        GoTo nextCell
    End If
Next I
MsgBox " not found"
nextCell:
Next cell

End sub