Copiar datos en otra hoja que tenga la fila vacía

Hola a todos soy nuevo aquí y necesitaría ayuda.
Tengo una macro pero necesitaría que me la completarla con la función que al pasar los datos a otra hoja (en total tengo unas 50 hojas y necesitaría que la ultima hoja fuera una especie de resumen), los datos que se vayan a copiar se copien en la fila vacía. En esta hoja tengo otros datos y no quiero que al utilizar la macro estos datos se borrasen.
La macro es la siguiente:
Sub Macro1()
Dim i As Integer
Dim nueva_fila As Integer
nueva_fila=0
For i =2 To 50
If (Range("F"+CStr(i)).Value>=1)Then
nueva_fila=nueva_fila+1
Rows(i).Copy Sheets("Positivos").rows(nueva_fila)
End If
Next i
End Sub
Gracias de antemano

1 respuesta

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas