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 15/11/2011, 18h13   #1
Membre du Club
 
Inscription : janvier 2007
Messages : 183
Détails du profil
Informations forums :
Inscription : janvier 2007
Messages : 183
Points : 48
Points : 48
Par défaut passer un paramètre dans un nom de table

Bonjour,

quand je fais la chose suivante,
Code :
DoCmd.RunSQL "DROP Table [T4_SUIVI_num_enq_15_11_2011]"
cela marche.
Mais maintenant je voudrais remplacer le 4 et la date par le contenu de 2 variables respectivement num et date.

Comment dois je opérer?
merci
AlexFred est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 15/11/2011, 18h55   #2
Rédacteur
 
Avatar de LedZeppII
 
Homme
Maintenance données produits
Inscription : décembre 2005
Messages : 3 939
Détails du profil
Informations personnelles :
Sexe : Homme
Localisation : France, Yvelines (Île de France)

Informations professionnelles :
Activité : Maintenance données produits
Secteur : Distribution

Informations forums :
Inscription : décembre 2005
Messages : 3 939
Points : 6 278
Points : 6 278
Bonjour,

Par concaténation. Exemple :
Code :
1
2
3
4
5
6
7
8
Dim sNum as string, sDate as string, sSQL as string
 
sNum = "5"
sDate = "16_11_2011"
 
sSQL = "DROP Table [T" & sNum  & "_SUIVI_num_enq_" & sDate & "]"
 
DoCmd.RunSQL sSQL
A+
LedZeppII est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/11/2011, 11h53   #3
Membre du Club
 
Inscription : janvier 2007
Messages : 183
Détails du profil
Informations forums :
Inscription : janvier 2007
Messages : 183
Points : 48
Points : 48
Merci.
J'avoue que j'avais essayé de faire quelque chose comme ça, mais je mettais perdu dans les doubles côtes.

Mais maintenant, j'ai un autre problème car avant de droper, il faut que je m'assure de l'existence de cette table.

Comment trouve t-on la solution dans l'aide Vba access?
AlexFred est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/11/2011, 12h15   #4
Rédacteur/Modérateur
 
Avatar de Domi2
 
Homme
Inscription : juin 2006
Messages : 6 223
Détails du profil
Informations personnelles :
Sexe : Homme
Âge : 52
Localisation : Suisse

Informations professionnelles :
Secteur : Administration - Collectivité locale

Informations forums :
Inscription : juin 2006
Messages : 6 223
Points : 9 928
Points : 9 928
Envoyer un message via Skype™ à Domi2
Bonjour,

On trouve énormément de chose dans la FAQ : Comment savoir si une table existe ?

Domi2
__________________
Vous avez des montres, nous avons le temps ! (citation attribuée à L.-S. Senghor)

Ici, on ne perd pas de temps ! On en passe...


Access : créer des codes-barres 128 en VBA
Access : les commandes intégrées des menus

Ce message (ou un autre) vous a aidé ? Votez pour lui avec
Domi2 est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 16/11/2011, 12h26   #5
Membre du Club
 
Inscription : janvier 2007
Messages : 183
Détails du profil
Informations forums :
Inscription : janvier 2007
Messages : 183
Points : 48
Points : 48
Merci
Effectivement je venais de trouver la solution sur la FAQ.
Cela marche très bien
AlexFred 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 13h28.


 
 
 
 
Partenaires

Hébergement Web