Necesito una macro que copie filas de hoja 1 y las pegue en hoja 2, solo las que cumplan una condición
En principio soy nuevo en el foro. Saludos a todos!.
Estoy necesitando una macro, que desde una base de datos llamase (hoja 1) . Seleccione y copie todas las filas que cuya celda de una columna especifica ( ejemplo M) cumple con una determinada condición, y las peque en otra hoja (hoja2) a partir de un determinado rango, teniendo en cuenta que se irán acumulando diariamente . Pero antes de pegarlo deberá evaluar la hoja 2 si la fila a pegar es igual a una existen (según condición de alguna celda), en ese caso debe borra la fila existente y pegar la nueva . Caso contrario solo debe pegarla.
Perdón si no me supe explicar. Estoy buceando en la web y la verdad ya estoy muy perdido, ya que mis conocimientos en esto son muy básicos.
1 Respuesta
Este creo que te puede servir
Y a este userform solo agregale este botón de copiar
Range(¨a3¨) = es desde donde va a empezar a copiar los datos
Private Sub CommandButton1_Click()
sheets("tu hoja donde se va a copiar los datos ").Select
Range("A3").Select
fila = Sheets("tu hoja con la BD").Range("A65536").End(xlUp).Row + 1
For i = 0 To ListBox1.ListCount - 1
Cells(fila, 1).Value = ListBox1.List(i, 0)
Cells(fila, 2).Value = ListBox1.List(i, 1)
fila = fila + 1
Next
End Sub
Recuerda valorar si te silve para cerra la pregunta
