Copiar y Pegar en Celdas en Blanco hasta la ultima linea.
Publicado por Julian (1 intervención) el 28/05/2018 19:47:52
Hola Gente, gracias por el espacio y las ayudas que me puedan brindar.
El asunto es que necesito pegar un valor de una celda en las celdas en blanco de una columna de otra hoja.
Aquí dejo una macro grabada pero necesitaria ayuda para modificarla.
El asunto es que necesito pegar un valor de una celda en las celdas en blanco de una columna de otra hoja.
Aquí dejo una macro grabada pero necesitaria ayuda para modificarla.
1
2
3
4
5
6
7
8
9
10
Sub PruebaCopiar()
Range("E3").Select
Selection.CopySheets("HISTORICO").Select
Range("F4").Select 'Este valor fue seleccionado manualmente
ActiveSheet.PasteApplication.CutCopyMode = False
Selection.AutoFill Destination:=Range("F4:F67") 'Es un rango manual y debe ser desde la ultima celda en blanco de la columna hasta la utlima fila en blanco.
Range("F4:F67").Select
End Sub
Valora esta pregunta
0
