Bonjour,

Sujet abordé de nombreuses fois, je cherche à modifier une requête de sélection déjà existante en VBA au clic sur un bouton.

A la lecture de différents tutos, j'ai essayé ceci (si quelqu'un veut bien me corriger si besoin est) :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
Dim Db As DAO.Database: Set Db = CurrentDb
Dim QryModele As DAO.QueryDef: Set QryModele = Db.QueryDefs("R_RechercheRecettes")
Dim strSQLModele As String
strSQLModele = QryModele.SQL
strSQLModele = strSQLModele & "...;"
Me.RecordSource = strSQLModele
Me.Requery
Mon soucis c'est que je me prends un message d'erreur "caractères trouvés après la fin de la chaine". Je pense que c’est à cause des ; qui se trouvent à la fin de la requête car si je la réécris entièrement en variable au début du code sans le ; je n'ai plus ce message. Cependant je préférerais éviter de la réécrire et donc plutôt récupérer celle déjà existante.

Comment gérer ce ; ?