Al escribir en un combobox de 3 columnas de un formulario me manda un mensaje de error.

Tengo un combox en un formulario si se busca tecleando un nombre y no esta me manda error 381. Si lo busco dando click en el desplegable funciona bien.

al seleccionar el nombre me manda los datos a estos  textbox.

Si no encuentra el nombre me gustaría que me mandara un mensaje de no existe o que solo se pueda seleccionar el nombre con el desplegable. Para no que me mande el mensaje de error.

1 Respuesta

Respuesta
2

Visita cursos de Excel y Macros:

Cursos de Excel y Macros - YouTube

-------------------

Para enviar el mensaje prueba lo siguiente:

Private Sub ComboBox1_Change()
  '
  With ComboBox1
    If .ListIndex > -1 Then
      Frm_CambioTurno.TextBox2 = .List(.ListIndex, 1)
      Frm_CambioTurno.TextBox6 = .List(.ListIndex, 2)
    Else
      MsgBox "No existe"
    End If
  End With
End Sub

-------------------

Para permitir solamente seleccionar los valores del combo, cambia la propiedad Style del combobox a fmStyleDropDownList

-------------------

Recomendaciones en mi canal:

Curso de macros. Metodo find completo. - YouTube

Curso de macros. Consejos para empezar a programar. - YouTube

-------------------

Sal u dos Dante Amor

¡Gracias! Buen inicio de año y gracias por seguir ayudándonos con nuestras dudas y a todos los integrantes de esta página de todoexpertos.

Muchas gracias.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas