re Marc, le forum
si tes textbox sont numérotées (textbox1, textbox2...)
tu peux utiliser cette boucle sur les contrôles
Private Sub valide_Click()
Dim i As Integer
For i = 1 To 3
If Me.Controls('Textbox' & i) = '' Then
MsgBox 'c'est vide'
Exit Sub
End If
Next i
userform1.show
End Sub
Si ils ont des noms spécifiques, tu peux utiliser cela :
if txttoto='' or txttata = '' then
msgbox 'c'est vide'
exit sub
end if
userform1.show
end sub