Discussion :

[Big-amine]

Bonjour;
J'essaie de définir en VBA la le recordsource de mon formulaire, ça marche parfaitement pour les recordsets constitués d'une seule table,
mais dés qu'il y a plusieurs tables en jeu, ça me donne une "Erreur 2001" et " Opération annulée"
Voici mon code:
Pour la requête sur une seule table:

Code :

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

1
2
3
Public Sub Blocage_E()
Me.RecordSource = "SELECT * FROM [Table Clients] WHERE ([Table Clients].[Code Client])='" & Me.Code_Client & "'"
End Sub

.

Pour une requête sur plusieurs tables:

Code :

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

1
2
3
4
5
6
Public Sub Blocage_E()
Me.RecordSource = "SELECT [Table Bons de Commande].[N° BC], [Table Bons de Commande].[Code Client],
 [Table Bons de Commande].[Mode de Paiement], [Table Clients].[Raison Sociale],
 [Table Clients].Téléphone FROM [Table Clients]INNER JOIN [Table Bons de Commande] ON
 [Table Clients].[Code Client] =[Table Bons de Commande].[Code Client] WHERE ([Table Bons de Commande].[N° BC])='" & Me.N°_BC & "'"
End Sub

Et c'est là ou ça bloque;
Je vous remercie à l'avance pour votre aide

[Big-amine]

Bon, j'ai trouvé le pourquoi, reste le comment:
La cause n'est pas la source de la requête (une ou plusieurs tables) mais le fait que le filtre de la clause WHERE soit un numéro auto (incompatibilité de données).
Donc reste le comment...