Saltar al contenido

Hacer una lista despegable con tablas como hipervinculo

publicado

Hola a todos,

Dentro de una misma hoja necesito hacer una lista despegable que sea un tipo índice con hipervinculos que vayan a más de 10 tablas que tengo dentro de esa hoja.

¿Alguien me podría ayudar, por favor?

Les agradezco de ante mano.

Featured Replies

publicado

Ya tienes esa lista desplegable en la parte izquierda de la barra de fórmulas.

Pero si te empeñar en volver a inventar la rueda.

1) Inserta un ComboBox ActiveX en la hoja

2) Coloca este código en ThisWorkbook:

Private Sub Workbook_Open()
Hoja1.ComboBox1.Clear
For Each tabla In ActiveSheet.ListObjects
Hoja1.ComboBox1.AddItem tabla.Name
Next
End Sub
[/CODE]

3) coloca este código en la hoja:

[CODE]Private Sub ComboBox1_Change()
Application.Goto Reference:=ComboBox1
End Sub[/CODE]

4) Guarda y cierra el archivo

5) Abre el archivo y listo

publicado
  • Autor

Ow, gracias por tu pronta respuesta. Sé que puedo desplegar el índice desde una esquina, pero son más de 50 tablas en el libro, entonces se pierden entre tanto número y nombre, porque ya le asigné un nombre a cada una de ellas.

Intentaré aplicar la solución que me diste el día de mañana cuando llegue a la oficina, pero desde ya reitero, muchas gracias.

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.