Discussion :

[vinkey_33]

bonjour j'ai un soucis avec le isnull je m'explique, j'ai un liste déroulante et j'aimerais que quand il y a aucune valeur de sélectionné qui m'affiche un msgbox voici le code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If IsNull(Liste_Equipement.Value) = "" Then
MsgBox "tddg"
Exit Sub
End If

[marot_r]

Bonjour.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
If IsNull(Liste_Equipement) Then
   MsgBox "tddg"
   Exit Sub
End If

IsNull retourne True ou False.
Là ce que tu avais écrit c'est "Est-ce que VRou (ou faux) est égale à une chaîne vide.".

Une astuce pour tester les nulls autrement pour les chaînes uniquement :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
if Liste_Equipement & "" = "" then
   'Ici ton code
end if

Normalement n'importe quoi et Null donne Null mais la concaténation d'un Null et d'une chaîne vide cela donne ... une chaîne vide.

A+

[Jean-Philippe André]

Salut,

je recommande la syntaxe Nz, plus flexible parfois :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

if Nz(Liste_Equipement,"") = "" then

[Invité]

Bonjour

Souvent le soucis est entre Null et vide (Empty) qui sont deux choses différentes.

Donc une autre alternative est de contrôler la longueur avec Len.

Philippe

[vinkey_33]

j'ai toujours le même problème avec nz comme isnull

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Nz(Liste_Equipement, "") = "" Then
MsgBox "rsz"
End If

[Invité]

Re

Bonjour
Donc une autre alternative est de contrôler la longueur avec Len.

As-tu testé cela ? La longueur ?

Philippe

[vinkey_33]

je ne vois ce que sait

[Invité]

Re

Par exemple :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
If Len(Liste_Equipement.value) = 0 Then
MsgBox "rsz"
End If

Philippe

[Invité]

Bonsoir,
If "" & Liste_Equipement.Value = "" Then