Estoy intentando hacer una macro con Excel y no consigo el resultado que quiero. Abajo os adjunto la tabla que estoy intentando leer y el código desde el que parto.
Lo que quiero es que: Si la primera fila es "OUT" , que busque la siguiente "IN" pero con las condiciones que le digo en el código.
Esto solo me lo está haciendo comparando dos filas consecutivos. Como hago para recorrer la lista y que no importe que el OUT esté en la fila 3 y el IN en la fila 15? (Por ejemplo). Es decir que hasta que no encuentre el IN, no pase a la siguiente fila de OUT. Adjunto el código también:
Private Sub CommandButton4_Click()
For i = 2 To 100
If Cells(i, "C").Value = "OUT" Then
If Cells(i + 1, "C").Value = "IN" And (Cells(i, "D").Value = Cells(i + 1, "D").Value Or Cells(i, "D").Value = Cells(i + 1, "E").Value And (Cells(i, "E").Value = Cells(i + 1, "D").Value Or Cells(i, "E").Value = Cells(i + 1, "E").Value) And Cells(i, "F").Value = Cells(i + 1, "F").Value) And (Cells(i, "G").Value = Cells(i + 1, "G").Value) Then
'Copiamos a la derecha de la fila correspondiente en base a la comprobación anterior para emparejar'
Range(Cells(i + 1, "A"), Cells(i + 1, "G")).Copy Destination:=Sheets("Hoja1").Cells(i, "i")
'Range(Cells(i + 1, "A"), Cells(i + 1, "G")).Value = ""'
End If
End If
Next
End Sub
Gracias de antemano!
Jabixo.