☰

Copiar hojas y referencias de celdas

tag-icon • tag-icon microsoft-excel worksheet-function cells copy
Copiar hojas y referencias de celdas

Digamos que tengo la "Hoja A" y la "Hoja B" dentro del mismo libro.

La hoja B tiene una celda que hace referencia a la hoja "A", es decir, ='Hoja A'!Q20

Quiero copiar la Hoja B y crear la "Hoja C" en el mismo libro y quiero que la referencia de celda (='Hoja A'!Q20) en la Hoja C haga referencia ahora a la Hoja B. Es decir, ='Hoja B '!Q20.

Cuando copio la hoja B y creo la hoja C, la referencia de celda sigue siendo ='Hoja A'!Q20

He visto soluciones a problemas similares, pero no al copiar hojas dentro del mismo libro.

tia

Respuesta1

Pruebe esta fórmula enHoja B:

=INDIRECT("'Sheet "&CHAR(CODE(RIGHT(CELL("filename"),1))-1)&"'!A1")

ingrese la descripción de la imagen aquí

Respuesta2

También puede definir una UDF simple, que devuelve el nombre de una hoja de trabajo cuya posición se mueve ofsdesde la hoja de trabajo actual.

Function sh(ofs As Long) As String
    Dim cw As Long
    cw = Application.Caller.Parent.Index
    sh = Worksheets(cw + ofs).Name
End Function

El nombre de la hoja de trabajo anterior será sh(-1), la siguiente será sh(1).
Ahora puedes hacer referencia a la celda Q20de la hoja de trabajo anterior mediante una fórmula:

=INDIRECT("'"&sh(-1)&"'!Q20")

o

=INDIRECT(ADDRESS(20,17,,,sh(-1)))

información relacionada