H o l a:
Si la lista desplegable es una validación de datos en una celda. Pon la siguiente macro en la misma hoja donde tienes la lista:
Private Sub Worksheet_Change(ByVal Target As Range)
'Por.Dante Amor
If Target.Count > 1 Then Exit Sub
If Not Intersect(Target, Range("E7")) Is Nothing Then
For Each h In Sheets
If UCase(h.Name) = UCase(Target) Then
existe = True
hoja = h.Name
Exit For
End If
Next
If existe Then
Sheets(hoja).Select
Else
MsgBox "La hoja no existe"
End If
End If
End Sub
Cambia en la macro "E7" por la celda en donde tienes la lista de validación.
Sigue las Instrucciones para poner la macro en los eventos de worksheet
- Abre tu libro de excel
- Para abrir Vba-macros y poder pegar la macro, Presiona Alt + F11
- Del lado izquierdo dice: VBAProject, abajo dale doble click a worksheet(la hoja donde tienes la lista de validación)
- Del lado derecho copia la macro
Si tu lista desplegable no es una lista de validación, entonces tendrás que explicarme cómo la tienes.
':)
S a l u d o s . D a n t e A m o r
':) Si es lo que necesitas. Recuerda valorar la respuesta. G r a c i a s.