Botón en hola excel
Cómo puedo añadir un botón en una hoja excel, el cual al pulsarle (clickearle),
me copie una parte de una tabla en otra hoja excel, pero en la parte siguiente a las ya escritas?
Es decir, que copie por ejemplo todas las filas cuya primera columna sea la fecha actual, en otra hoja excel, al final de la misma....(en las celdas vacías)
Un saludo y gracias
me copie una parte de una tabla en otra hoja excel, pero en la parte siguiente a las ya escritas?
Es decir, que copie por ejemplo todas las filas cuya primera columna sea la fecha actual, en otra hoja excel, al final de la misma....(en las celdas vacías)
Un saludo y gracias
1 Respuesta
Respuesta de Luis Mondelo
1
Aquí tienes: Esta macro copia las filas de la hoja 1 en la hoja 2 examinando la fecha que contiene la primera celda de cada fila de la columna A. Si la fecha es de hoy copiará la fila a la hoja 2.
Sub fecha_de_hoy()
Sheets(1).Range("a1").Select
Do While ActiveCell.Value <> ""
If Date = ActiveCell.Value Then
ActiveCell.EntireRow.Copy Destination:=Sheets(2).Range("a10000").End(xlUp).Offset(1, 0)
End If
ActiveCell.Offset(1, 0).Select
Loop
End Sub
No olvides cerrar la consulta y puntuar.
Sub fecha_de_hoy()
Sheets(1).Range("a1").Select
Do While ActiveCell.Value <> ""
If Date = ActiveCell.Value Then
ActiveCell.EntireRow.Copy Destination:=Sheets(2).Range("a10000").End(xlUp).Offset(1, 0)
End If
ActiveCell.Offset(1, 0).Select
Loop
End Sub
No olvides cerrar la consulta y puntuar.
