Commencez par créer deux variables que vous allez utiliser dans le code VBA, une pour tenir votre valeur de la variable et l'autre pour contenir la chaîne SQL. Tapez la commande suivante pour créer vos variables:
Dim mySQLVariable As String
Dim strSQL As String
Réglez une valeur pour la variable que vous allez utiliser dans votre chaîne SQL telles que les suivantes:
mySQLVariable = "Sales Manager"
Définissez votre chaîne SQL telles que les suivantes:
strSQL = "SELECT employés. [Prénom],"
strSQL = strSQL "Les employés. [Nom],"
strSQL = strSQL «Les employés. [Titre de l'emploi]"
strSQL = strSQL "FROM Employees"
strSQL = strSQL "WHERE (((employés [Titre de l'emploi]) = 'Sales Manager').) -"
Modifier la dernière ligne de code dans l'étape précédente et remplacer "Sales Manager" avec votre variable comme suit:
strSQL = strSQL "WHERE (((employés. [Intitulé du poste]) =" (mySQLVariable) "')) -"