Opérateur In (Microsoft Access SQL)

  • Article

S’applique à : Access 2013 | Access 2016

Détermine si la valeur d'une expression est égale à des valeurs dans une liste spécifique.

Syntaxe

expr [ Not ] In ( value1, value2, ... )

expr [ Not ] In ( SELECT ... )

Remarques

La syntaxe de l'opérateur In est composée des arguments suivants :

Élément Description
expr Expression identifiant le champ qui contient les données que vous souhaitez évaluer.
valeur1, valeur2 Expression ou liste d'expressions par rapport à laquelle vous voulez évaluer expr.

Si expr se trouve dans la liste des valeurs, l’opérateur In retourne True ; sinon, elle retourne False. Vous pouvez inclure l'opérateur logique Not pour évaluer la condition contraire (c'est-à-dire, si expr n'est pas dans la liste de valeurs).

Vous pouvez par exemple utiliser In pour déterminer quelles commandes ont été expédiées vers des régions spécifiques :

SELECT * 
FROM Orders 
WHERE ShipRegion In ('Avon','Glos','Som')

Vous pouvez également utiliser In pour référencer une table ou une requête qui existe dans un fichier de base de données externe :

SELECT qryValues 
FROM qryValues In 'c:\files\MyDB.accdb'

Exemple

Dans l'exemple suivant, la table Orders de la base de données Northwind.mdb est utilisée pour créer une requête qui indique toutes les commandes expédiées vers la Bretagne et la Corse et leurs dates d'expédition.

Cet exemple appelle la procédure EnumFields, que vous trouverez dans l’exemple d’instruction SELECT.

Sub InX() 
 
    Dim dbs As Database, rst As Recordset 
 
    ' Modify this line to include the path to Northwind 
    ' on your computer. 
    Set dbs = OpenDatabase("Northwind.mdb") 
 
    ' Select records from the Orders table that 
    ' have a ShipRegion value of Lancashire or Essex. 
    Set rst = dbs.OpenRecordset("SELECT " _ 
        & "CustomerID, ShippedDate FROM Orders " _ 
        & "WHERE ShipRegion In " _ 
        & "('Lancashire','Essex');") 
     
    ' Populate the Recordset. 
    rst.MoveLast 
     
    ' Call EnumFields to print the contents of 
    ' the Recordset. 
    EnumFields rst, 12 
 
    dbs.Close 
 
End Sub

Voir aussi

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.