¡Código VBA para Excel que me de aviso de dato no encontrado en lista ComboBox!

Para Dante Amor!

Bueno la consulta es sencilla y es que quiero que un combobox de mi formulario de aviso al usuario de que el dato que esta escribiendo no esta en la lista del combobox y no lo deje salir del combobox amenos que lo deje en blanco o de un valor de la lista!

Respuesta
1

H o l a: 

Nuestro amigo Dante esta ausente estos días, porque siempre estoy a la expectativa de sus respuestas, será que está a Full trabajo.

Pero si deseas puedo apoyarte

Muestra el código del combobox para validar los datos saludos!

Hola:

Adriel Ortiz Mangia te agradecería me ayudaras con esta consulta!

Gracias!

H o l a:

Muestra el código del combobox para validar los datos saludos!

Hola:

Adriel pues no tengo código que valide los datos para que me cargue la lista al combobox uso la propiedad ROWSOURCE.

Saludos!

¿Cómo realizas la búsqueda?

¿Deseas código para buscar con el combobox?

Muestra una imagen de tu formulario y de tu hoja espero tus comentarios

Si quieres te mando un archivo a tu correo para que veas la situación!

Envíamea: [email protected]

Listo Adriel te envíe el correo con el archivo adjunto!

H o l a:

Te paso la macro 

Private Sub cmrubro_Exit(ByVal Cancel As MSForms.ReturnBoolean)
On Error Resume Next
If cmrubro.Value = "" Then
MsgBox "El RUBRO no puede estar vacío ", vbCritical
Cancel = True
Exit Sub
End If
Set h1 = Sheets("Listas")
Set busco = h1.Range("C:C").Find(cmrubro, lookat:=xlWhole)
If busco Is Nothing Then
    MsgBox "No existe el RUBRO", vbInformation
    cmrubro.ListIndex = 0
    Cancel = True
End If
End Sub

Me comentas saludos!

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas