Macro VBA para copiar celda adyacente solo si el campo relacionado en otra hoja esta vacio

Estoy liado con un archivo para controlar entradas y salidas de mercancías de un almacén. El problema lo tengo con el registro de las salidas.

El libro consta de dos hojas, la primera "Salida" consta de 3 columnas, Referencia, Fecha (OUT) y Mes (OUT), el campo referencia es variable y puede contener valores duplicados, cada celda correspondería con una unidad. Por ejemplo:

(A1)Referencia (B1) Fecha (C1) Mes

(A2)10185041 (B2) 09-05-19 (C2) 5

(A3)20185031 (B3) 09-05-19 (C3) 5

(A4)20185031 (B4) 09-05-19 (C4) 5

(A5)50244524 (B5) 09-05-19 (C5 )5

En la segunda hoja ("Seguimiento") consta de más columnas, Shipment, Proveedor, Fecha (IN), Mes (IN), Referencia, Nombre, Cantidad, Fecha (OUT), Mes (OUT). Los campos relacionados entre las dos hojas serían las columnas E, H e I. El aspecto de la segunda hoja sería:

(C1) Fecha (IN), (D1) Mes (IN), (E1) Referencia, (H1) Fecha (OUT), (I1) Mes (OUT)

(C2) 08-03-19 (D2) 3 (E2) 20180118 (H2) "vacía" (I2) "vacía"

(C3) 14-02-19 (D3) 2 (E3) 10185041 (H3) 07-03-19 (I3) 3

(C4) 15-02-19 (D4) 2 (E4) 10185041 (H4) "vacía (I4) "vacía"

(C5) 15-02-19 (D5) 2 (E5) 10185041 (H5) "vacía" (I5) "vacía"

Lo que quiero conseguir, y no consigo :(, es que la macro busque cada celda de la columna A de la hoja Salida y vaya a Seguimiento, busque una línea que contenga la misma referencia, y si la columna H está vacía le pege la fecha y el mes de la anterior hoja, si está ya completada que vaya a la siguiente, una vez hecho esto que haga el mismo proceso con cada una de las celdas rellenas en la columna A de la hoja Salida.

No sé si me he explicado bien pero si es necesario puedo colgar el archivo.

Añade tu respuesta

Haz clic para o