BUSCAR UN NOMBRE DE HOJA DESDE EL CONTENIDO DE UNA CELDA

16/06/2004 - 22:21 por Patricio Ramirez | Informe spam
SALUDOS.

MI PROBLEMA ES EL SIGUIENTE:

TENGO VARIAS HOJAS, CADA UNA CON EL NOMBRE DEL MES EN
CUESTION. SON SUMATORIAS Y PROMEDIOS. AL FINAL DE ESTAS
HOJAS TENGO OTRA CON LOS RESULTADOS ACUMULADOS POR MES.
LO QUE DESEO HACER ES PODER IR AUTOMATICAMENTE AL NOMBRE DE
LA HOJA TOMANDOLO DESDE UNA CELDA ESPECIFICA (CON EL NOMBRE
DEL MES) Y LLEVADO EL DATO QUE ES UN ACUMULADO.

SE AGRADECE CUALQUIER AYUDA.

CHAOLIN

Preguntas similare

Leer las respuestas

#1 Héctor Miguel
17/06/2004 - 07:20 | Informe spam
hola, Patricio !

disculpa que omita referenciar tu consulta, pero...
usar mayusculas en correos electronicos [y grupos de noticias] 'equivale' a... ¡ GRITAR !!! :((

existen varios metodos de 'navegacion' por las hojas de un mismo libro [p.e.]
- seleccionar 'directamente' la pestaña de la hoja con el raton
- 'avanzar' a la [siguiente <|> previa] hoja con el teclado =>{Ctrl}+{AvPag} <|> {Ctrl}+{RePag}<- un 'click-derecho' en las flechas de navegacion en la parte inferior izquierda
[junto a los nombres de las hojas y barra de desplazamiento horizontal] 'presenta' una lista de las hojas en el libro
- usar los atajos para 'ir a...' [cualquiera de los cuatro metodos siguientes]
a. edicion / ir a...
b. {Ctrl}+i
c. {F5}
d. desplegar la 'caja de nombres y direcciones' [a la izquierda de la barra de formulas]
... e introducir la referencia [p.e. Hoja60!a25 o... 'Nombre de la hoja'!a45]
=> 'nota' que entre el nombre de la hoja y el rango de referencia... 'va' un signo >!< [cierre de admiracion] < y... si el nombre de la hoja tiene 'espacios' [o solo numeros] se delimita con apostrofos >'< [antes del signo]
- asignar nombres UNICOS [en el libro] a celdas 'especiales' [de cada hoja] y usar los atajos anteriores
- una macro [como la siguiente]
___ en un modulo de codigo 'normal' ___
Sub Ir_a_OtraHoja()
Dim LaHoja As Object, EstaHoja As String
EstaHoja = InputBox("Indica el nombre de la hoja", "Ir a otra hoja...")
If EstaHoja <> "" Then
On Error Resume Next
Set LaHoja = Sheets(EstaHoja)
If Not LaHoja Is Nothing Then
LaHoja.Activate
Else: MsgBox "La hoja solicitada NO ""existe"" !!!", , ""
End If
Else: MsgBox "Cambio de hoja ""cancelado"".", , ""
End If
Set LaHoja = Nothing
End Sub
¨¨¨¨¨¨¨¨¨¨¨¨
podrias 'probar' cambiando la asignacion de la variable 'EstaHoja' [en lugar de un inputbox] a...
EstaHoja = ActiveCell
[supone que el cursor esta en alguna celda con el nombre de 'la hoja' a la que quieres ir]

saludos,
hector.
Respuesta Responder a este mensaje
#2 Víctor
17/06/2004 - 08:46 | Informe spam
Con la misma advertencia que Héctor en lo que respecta a
las mayúsculas, puedo aportarte otra solución que quizá
te sirva, aunque no acabo de entender bien la última
parte de lo que quieres hacer.

Si en la hoja donde tienes los datos resumen hay celdas
con el nombre del mes (según creo entender), puedes
insertar un hipervínculo en la celda donde diga 'enero'
hacia esa hoja concreta (Menú / Insertar / Hipervínculo,
vincular a: 'Lugar de este documento', selecciona Enero y
acepta. Y así sucesivamente para el resto de meses-hojas.

De esta forma, bastará que pinches la celda con el mes
que quieras, y te dirigirá a esa hoja.

Lo que no me queda claro, como he dicho antes, es eso
de 'LLEVADO EL DATO QUE ES UN ACUMULADO'.

:-)

SALUDOS.

MI PROBLEMA ES EL SIGUIENTE:

TENGO VARIAS HOJAS, CADA UNA CON EL NOMBRE DEL MES EN
CUESTION. SON SUMATORIAS Y PROMEDIOS. AL FINAL DE ESTAS
HOJAS TENGO OTRA CON LOS RESULTADOS ACUMULADOS POR MES.
LO QUE DESEO HACER ES PODER IR AUTOMATICAMENTE AL NOMBRE
DE LA HOJA TOMANDOLO DESDE UNA CELDA ESPECIFICA (CON EL
NOMBRE DEL MES) Y LLEVADO EL DATO QUE ES UN ACUMULADO.

SE AGRADECE CUALQUIER AYUDA.

CHAOLIN
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida