copiar Celda.Contenido de hoja a hoja

[femarver]

Hola!
Estoy intentando hacer una sencilla macro que copie valores de una hoja a hoja pero referenciados, es decir que si luego los modifico en la hoja 1, automáticamente se modifiquen en la hoja...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[DOOCH]

Hola

Sub Macro1()
    Dim ws1 As Worksheet
    Dim ws2 As Worksheet

    Set ws1 = ThisWorkbook.Sheets("Hoja1")
    Set ws2 = ThisWorkbook.Sheets("Hoja2")
    ws2.Range("A1").Copy...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Gerson Pineda]

Hola

Otra alternativa:

Sub PegarCeldaReferencia()
Sheets("Hoja2").Range("A1").Formula = "= " & Sheets("Hoja1").Range("A1").Address(external:=True) & ""
End Sub

Saludos

 

[femarver]

Muchas gracias por las respuestas, voy a ponerme con ello.

Gracias