condition ou sous vb

Jimrcl · 21 Mars 2005

Bonjour le forum,
comment traduit on la condition ou sous vba
je veux tester si j'ai bien entrer quelque chose dans mes 4 textbox et mes 3 combobox de ma userform, avant d'aller les mettre à la suite de ma base de donnée.
Merci beaucoup.
B)

Ashaar · 21 Mars 2005

Bonjour,

Avec 'And' je pense.

Private Sub CommandButton1_Click()
If TextBox1.Value <> '' And TextBox2.Value <> '' And TextBox3 <> '' And TextBox4 <> '' Then
MsgBox ('Tous les TextBox ont des valeurs')
End If
End Sub

Avec une boucle ce serait sans doute bien plus joli et correct mais bon.

MichelXld · 21 Mars 2005

bonjour Jimrcl , bonjour Ashaar

ci joint une autre possibilité

Dim i As Byte, j As Byte

For j = 1 To 4
If Me.Controls('TextBox' & j) = '' Then
MsgBox 'Le TextBox' & j & ' est vide . '
Exit Sub
End If
Next j

For i = 1 To 3
If Me.Controls('ComboBox' & i).Value = '' Then
MsgBox 'Le ComboBox' & i & ' est vide . '
Exit Sub
End If
Next i

bonne soiree
MichelXld

condition ou sous vb

Jimrcl

Guest

Ashaar

Guest

MichelXld

XLDnaute Barbatruc

Discussions similaires

condition ou sous vb

Jimrcl

Guest

Ashaar

Guest

MichelXld

XLDnaute Barbatruc

Discussions similaires

Privacy & Transparency

Privacy & Transparency