Saltar al contenido

Combobox con tres nombres de hojas


Recommended Posts

publicado

 

Tengo un libro con 6 hojas y un userform en el cual hay un combobox con el nombre de tres de esas seis hojas. Como seria la macro para que a través del combobox me lleve a cada una de esas tres hojas

publicado

Hola Marcos14, una manera de hacerlo sería algo así:
 

'AL iniciarse el UserForm
'Llenamos el combobox
Private SubUserForm_Initialize()
	Dim Hoja As Worksheet
	ComboBox.Clear
	For Each Hoja in WorkSheets
		ComboBox.AddItem Hoja.Name
	Next
End Sub


'Al seleccionar alguna hoja nos vamos a la hoja seleccionada
'Evento Al cambiar del Combo
Private Sub ComboBox_Change()
	Sheets(ComboBox).Select
End Sub

Esto te muestra todas las hojas. Para filtrarlo con las hojas que necesitas te lo dejo para que practiques.

Escrito al boleo

Saludos

 

 

publicado

Te dejo otra opción en la que tienes un formulario en el cual tienes una caja de texto y un listbox.

Al iniciar el formulario te carga las hojas en el listbox por orden alfabético y si introduces una letra en el textbox te muestra las hojas que comiencen por dicha letra.

Dando un click en cualquier hoja filtrada del listbox te lleva automáticamente a la hoja seleccionada.

Listar hojas del libro y dirigirse a ella con un textbox y listbox.xlsm

Archivado

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

×
×
  • Crear nuevo...

Información importante

Echa un vistazo a nuestra política de cookies para ayudarte a tener una mejor experiencia de navegación. Puedes ajustar aquí la configuración. Pulsa el botón Aceptar, si estás de acuerdo.