Deseleccionar y borrado automático en cuadro de texto
He estado muy ocupada y no he podido agradecerte y valorar tus últimas respuestas. Hoy por fin lo he hecho. Tu ayuda no tiene precio para los que somos novatos en la materia.
La cuestión que te planteo hoy es sobre si existe alguna posibilidad con código de borrar automáticamente y no manualmente la selección hecha en un combo que se han ido sumando a un cuadro de texto. Con este código se añaden ordenadamente. ¿Cómo podría hacer que se borraran automáticamente si ha habido error al seleccionar? ¿Con otro combo?
Private Sub CASOS_AfterUpdate()
If Nz(Me.LISTA_CASOS, "") = "" Then
Me.LISTA_CASOS = Me.CASOS
Else
Me.LISTA_CASOS = Me.LISTA_CASOS & " - " & Me.CASOS
Ordenar
Me.CASOS= Null
Me.Cbotipocaso = Null
End Sub
2 respuestas
Respuesta de Sveinbjorn El Rojo
1
Respuesta de Jacinto Trillo Jareño
1