Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Access > VBA Access
VBA Access Le forum pour les questions relatives au code VBA sous Access, et à son environnement de développement VBE.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 04/02/2011, 19h59   #1
Invité régulier
 
Inscription : juin 2007
Messages : 8
Détails du profil
Informations personnelles :
Localisation : France, Seine Maritime (Haute Normandie)

Informations forums :
Inscription : juin 2007
Messages : 8
Points : 5
Points : 5
Par défaut Source requête en variable ?

Bonjour,

J'utilise access 2003

Dans la base de données j’ai plusieurs tables qui comportent des noms de champ identiques avec le même type de données.
Les noms de ces tables sont listés dans une table temporaire. A partir d’une boucle énumérant les noms de tables, je voudrais en vba effectuer les corrections dans toutes les tables qui comportent le même nom de champ.
Est-il possible de passer en variable la source du recordset suivant l’exemple ci-dessous qui ne fonctionne pas évidemment?


Code :
1
2
3
4
5
6
7
8
Dim nom_table As String
Dim req As Recordset
Dim bd As Database
Set bd = CurrentDb
nom_table = FOURNISSEUR
Set req = bd.OpenRecordset("SELECT nom_table.nomclient " _
& "FROM nom_table " _
& "ORDER BY nom_table.nomclient;")
Merci
PSEUDOMONASSE est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 04/02/2011, 20h18   #2
Rédacteur/Modérateur
 
Avatar de Philippe JOCHMANS
 
Homme Philippe JOCHMANS
Développeur informatique
Inscription : mai 2005
Messages : 17 609
Détails du profil
Informations personnelles :
Nom : Homme Philippe JOCHMANS
Âge : 44
Localisation : France, Loir et Cher (Centre)

Informations professionnelles :
Activité : Développeur informatique
Secteur : Communication - Médias

Informations forums :
Inscription : mai 2005
Messages : 17 609
Points : 30 959
Points : 30 959
Envoyer un message via MSN à Philippe JOCHMANS Envoyer un message via Skype™ à Philippe JOCHMANS
Bonjour

Ta variable n'est pas interprétée comme telle, mais comme le nom de ta table.

Essayes :
Code :
1
2
3
4
5
 
nom_table = "FOURNISSEUR"
Set req = bd.OpenRecordset("SELECT nomclient " _
& "FROM " & nom_table & " _
& "ORDER BY nomclient;")
Philippe
__________________
Détaillez vos questions, sinon vous aurez des réponses erronées et vous irez tout droit dans le et lisez les règles sinon
Si vous pensez commencer sans un livre, oublier : livres pour débuter
Vous pouvez consulter mes articles sur Access et PowerPoint
Le blog Office.

Inutile de m'envoyer un MP pour des questions techniques ou de me relancer , je n'y répondrais pas.
Philippe JOCHMANS est déconnecté   Envoyer un message privé Réponse avec citation 10
Vieux 04/02/2011, 20h40   #3
Invité régulier
 
Inscription : juin 2007
Messages : 8
Détails du profil
Informations personnelles :
Localisation : France, Seine Maritime (Haute Normandie)

Informations forums :
Inscription : juin 2007
Messages : 8
Points : 5
Points : 5
Par défaut Source requête en variable ?

Merci Philippe,

Ca marche!

Bonne soirée
PSEUDOMONASSE est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 08h29.


 
 
 
 
Partenaires

Hébergement Web