Validar campos vacíos en formulario

[AlexanderS]

Hola, No se si tal vez este repetido este aporte pero dejo pues un aporte sencillo que vale para cualquier formulario sin importar la cantidad de texbox o combobox que tengan, lo que hace es simplemente por medio de una UDF validar que todos los espacios del formulario estén llenos de lo contrario lanzara un mensaje con los espacios que faltan por llenar y los marcara en rojo.

En un modulo normal colocamos esto:

Function validar(form As Object) As String

Dim txt As Control, x As String

For Each txt In form.Controls

If TypeName(txt) = "TextBox" Or TypeName(txt) = "ComboBox" Then _

If txt.Value = "" Then x = x & Chr(10) & txt.Name: txt.BackColor = vbRed Else txt.BackColor = vbWhite

Next

validar = x

End Function[/CODE]

Y en el evento del botón con el que guardaremos la información colocamos esta condición:

[CODE]if not validar(Me) ="" Then '<< Validar(Me), utilizo el ME para indicar que actuara sobre este formulario
Msgbox "Falta la siguiente información:" & Validar(Me)
exit sub
else
'Aqui colocamos el codigo que queramos
end if [/CODE]

Dejo un pequeño ejemplo con la explicación del código paso por paso.

Saludos y espero que le sea de utilidad a alguien.

Validar espacios vacios.xls

Validar espacios vacios.zip

[Antoni]

.

Estos son algunos Links relacionados con el tema:

https://www.ayudaexcel.com/foro/threads/validar-que-todos-los-textbox-de-un-formulario-esten-informados.29688/

https://www.ayudaexcel.com/foro/threads/validar-textbox.32371/

https://www.ayudaexcel.com/foro/threads/borrar-todos-los-textbox-de-una-hoja-formulario.19131/

https://www.ayudaexcel.com/foro/threads/validacion-de-textbox-con-formato-hora-hh-mm.21663/

.

[AlexanderS]

Seria bueno juntar este tipo de aportes y crear un complemento o un add-in, para tener todas estas opciones a la mano.

Salu2

[digitalboy]

Muy buena la funcion, parecida a la que utilizo, seria cool poder usar algo como esto:

Me.ValidateControls(Controls as Variant)[/CODE]

De alguna forma incorporar un metodo a nuestros formularios y a ese metodo se le pase una matriz con los nombres de los controles a validar. Ya todo lo quiero ver con un enfoque Orientado a Objetos! jajaja

Saludos!