Activar hojas con las opciones de un ComboBox
Tengo un ComboBox en una hoja de excel llamada Satisfacción clientes y la idea es que cuando se tome las opciones de la lista desplegable del ComboBox, éstas activen las hojas que están establecidas para eso, es decir que:
Para la opción del comboBox que se llama "Cordialidad en el servicio", cuando se escoja muestre la hoja cordialidad
Para la opción que se llama "Claridad en la información", muestre la Hoja claridad, etc.
El problema es que apliqué un código pero no me arroja el resultado deseado (al escoger la opción no sucede nada).
Soy nuevo en esto por lo que les pido su colaboración. El código es:
Private Sub ComboBox_indicadores_Change()
Dim Satisfaccion_clientes As Worksheet
Dim indicador As String
indicador = ComboBox_indicadores.Text
Select Case indicador
Case indicador = "Cordialidad en el servicio"
Sheets("Cordialidad").Select
Range("e10").Select
Case indicador = "Claridad en la información"
Sheets("Claridad").Select
Range("e10").Select
Case indicador = "Respuesta entregada"
Sheets("Respuesta").Select
Range("e10").Select
Case indicador = "Horario de atención"
Sheets("Horario").Select
Range("e10").Select
Case indicador = "agilidad y oportunidad en el servicio"
Sheets("Agilidad").Select
Range("e10").Select
Case indicador = "Satisfacción en el respeto recibido"
Sheets("Respeto").Select
Range("e10").Select
Case indicador = "Resultados en la evaluación de atención al cliente"
Sheets("Resultados").Select
Range("e10").Select
End Select
End Sub
Private Sub WorkSheet_Activate()
ComboBox_indicadores. AddItem ("Cordialidad en el servicio")
ComboBox_indicadores. AddItem ("Claridad en la información")
ComboBox_indicadores. AddItem ("Respuesta entregada")
ComboBox_indicadores. AddItem ("Horario de atención")
ComboBox_indicadores. AddItem ("Agilidad y oportunidad en el servicio")
ComboBox_indicadores. AddItem ("Satisfacción en el respeto recibido")
ComboBox_indicadores. AddItem ("Resultados en la evaluación de atención al cliente")
End Sub