TIENDA RECOMENDADA Inicio Últimos Temas Consulta con Asesor PCs Destacados Chollos 2ª Mano PC Gamer PC Edición PC Barato/Apu PC Para Todo Comprar Windows / Office

No repetir valores en combo box en Visual Basic Access pero sí permitir uno en específico.

mtz.fco

Miembro del Foro
Buen día.

Tengo este código de Visual Basic en Access, lo que hace es que si se elige el mismo valor de los combos 1 y 2, da el mensaje de que no se pueden repetir los valores, lo que quiero hacer es que se pueda elegir el "No aplica" en ambos, no los tome como repetidos y luego dar foco al combo 3.

Private Sub cmb2_AfterUpdate()
If (cmb1.Value = cmb2.Value) And (Me.cmb1.Value = "No aplica") Then
cmb3.SetFocus
ElseIf (cmb1.Value = cmb2.Value) And (Me.cmb1.Value <> "No aplica") Then
MsgBox "Los motivos no deben repetirse", vbInformation, "Datos repetidos"
cmb2 = ""
cmb1 = ""
Me.cmb1.SetFocus
ElseIf (cmb1.Value <> cmb2.Value) Then
DoCmd.CancelEvent
End If
End Sub
 

Adjuntos

  • motivo-no-aplica.png
    motivo-no-aplica.png
    3,4 KB · Visitas Hoy: 1

Últimos mensajes

Arriba
Esta web usa cookies y participa en el Programa de Afiliados de Amazon EU, un programa de publicidad para afiliados diseñado para ofrecer a sitios web un modo de obtener comisiones por publicidad, publicitando e incluyendo enlaces a Amazon.es . En calidad de Afiliado de Amazon, obtengo ingresos por las compras adscritas que cumplen los requisitos aplicables