Discussion :

[jeromus]

bonsoir

j ai chercher de partout mais je trouve pas de reponce a ma question?

je veux faire une requete ou un runsql update pour la date du jour avec un champ calculé sur acces 2010 peut importe

mais mon probleme ce que j ai un formulaire et avec une liste deroulante qui affiche mes tables et un sous formulaire qui affiche les donnee

je fait une runsql update qui marche si je met le non de ma table mais j aimerais mettre a la place de la table la liste deroulante qui affiche le nom de mes tables pour eviter de creer 20 requete et den creer une nouvelle a chaque table que je cree

ou sinon comment cree une requete update quand je lance mon code pour inserer une nouvelle table

merci

[Invité]

Bonjour
Personnellement j'utiliserai quelque chose comme cela:
Sur un bouton:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub MonBouton_Click()
Dim oDb As DAO.Database
Dim MaVar As String ' variable table
Dim StrSql As String ' Variable Sql
Set oDb = CurrentDb
MaVar = [NomDeTonFormulaire].NomDeTaListeDéroulante.Value
 
StrSql = "UPDATE NomDeTable SET SuiteDeTaRequête);"
StrSql = Replace(StrSql, "NomDeTable", MaVar)
 
oDb.Execute StrSql
 
End Sub

Ainsi tu crées ta requête complète avec le nom de la première table et le nom de la table est remplacé par le nom contenu dans ta liste déroulante..

[jeromus]

Bonjour

Le code fonctionne bien

Mais j’ai un petit souci il me dit qui trouve pas les tables avec un espace exemple de nom de table F BKBE F GGHJ il me dit qu’il ne trouve pas la table <f>

J’ai bien pensé supprimer l’espace mais j’ai 2 base de donnée en relation dont le numéro clef est l immat donc c’est plutôt gênant

Y a-t-il une solution simple ou il faut que je me refasse les 2 programmes

Merci

[Invité]

Et en mettant le nom de la table entre [ ].

[jeromus]

merci

ca marche nickel