Arrastrar varias celdas enllavadas con diferentes valores
Al copiar Ej.
Hoja1 (A1, 2,3,4...) igualar esos valores en hoja 2, Ej.
En hoja 2 = Hoja1! A1 y luego arrastrar esos valores hacia abajo, pero luego enllavarlos, ejemplo F4, quedaría así :
=Hoja1! $A$1
=Hoja1! $A$2
Sucesivamente, pero enllavarlos de una vez no uno por uno, según un rango, Para Dante Amor.
1 respuesta
Respuesta de Dante Amor
1
No entiendo a que te refieres con "enllavarlos", no conozco el término.
Pero, haber si entendí, quieres escribir algo en la hoja1, columna A, por ejemplo, en la celda A4; y quieres que en la hoja2, celda A4, se ponga la fórmula =Hoja1!$A$4
Si es así, pon la siguiente macro en la hoja1
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Not Intersect(Target, Columns("A")) Is Nothing Then
If Target.Count > 1000 Then Exit Sub
For Each c In Target
Sheets("Hoja2").Range("A" & c.Row).FormulaR1C1 = "=Hoja1!R" & c.Row & "C1"
Next
End If
End SubSigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(tu hoja)
- En el panel del lado derecho copia la macro
.
'S aludos. Dante Amor. Recuerda valorar la respuesta. G racias
.
Avísame cualquier duda
.
