Discussion :

[pamela nyoubissi]

Bonsoir

Je souhaiterais écrire l'instruction suivante en VBA:

"la zone de texte intitulée [Texte2] est Nulle"

et également l'nstruction "[Type de dossier] = "Livre" ou "Cahier""

SVP aidez moi

[argyronet]

Bonjour,

Je ne saisi pas trop l'objectif...

Tu peux écrire cela de différentes façons, tout dépend ce que tu veux en faire ensuite...
Par exemple :

la zone de texte intitulée [Texte2] est Nulle

Code :

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

1
2
3
Private Sub Commande0_Click()
    MsgBox "Le champ [Texte2] est " & IIf (IsNull(Me![Texte2]), "NULL !", "Pas NULL !"), vbInformation
End Sub

et également l'instruction "[Type de dossier] = "Livre" ou "Cahier"

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Private Sub Commande0_Click()
Dim strContenuChamp           As String
 
    If Not IsNull([Type de dossier]) Then
        Select Case Me![Type de dossier]
            Case "Livre", "Cahier"
                strContenuChamp = "contient le mot " & Me![Type de dossier]
            Case Else
                strContenuChamp = "contient autre chose (" & Me![Type de dossier] & ")"
        End Select
    Else
        strContenuChamp = "Le champ [Type de dossier] est NULL"
    End If
    MsgBox strContenuChamp, vbInformation
End Sub

Argy