Discussion :

[modus57]

Bonjour le forum.

Je débute avec Access, voici ma question qui vous paraîtra simple, mais qui m’aidera à progresser dans mon apprentissage.

Sur click d’un bouton dans un formulaire, comment sélectionner dans une table (TABLE1) les champs qui correspondent à la valeur du champ actif de ce formulaire et ensuite ajouter ces champs dans la table (TABLE2).

Merci d’avance pour votre réponse, A +

[mout1234]

comment sélectionner dans une table (TABLE1) les champs qui correspondent à la valeur du champ actif de ce formulaire et ensuite ajouter ces champs dans la table (TABLE2).

Je suppose que tu veux dire

comment sélectionner dans une table (TABLE1) les enregistrements ...la valeur de l'enregistrement actif de ce formulaire... ajouter ces enregistrements dans la table (TABLE2).

Dans ce cas, tu devrais pouvoir procéder de cette manière (non testé et adapter):

Code VBA :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub MonBouton_Click()
 
    Dim sSQL As String
 
    sSQL = "INSERT INTO Table2 ( MonChamp1, MonChamp2... )" & _
           " SELECT Table1.MonChamp1, Table1.MonChamp2,..." & _
           " FROM Table1" & _
           " WHERE MaClé=" & Me!Maclé
 
   CurrentDb.Execute sSQL
 End Sub

[modus57]

Effectivement,

Sur un évènement click d’un bouton dans un formulaire je veux sélectionner dans une table (TABLE1) les enregistrements qui correspondent à la valeur du contrôle actif de ce formulaire et ensuite ajouter ces champs dans la table (TABLE2).

Code :

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

" WHERE MaClé=" & Me!Maclé

Maclé serait le nom du contrôle dans le formulaire?

Autre solution récupérer la valeur d'un InputBox dans une variable, sélectionner dans une table (TABLE1) les enregistrements qui correspondent à la valeur de cette variable et ensuite ajouter ces champs dans la table (TABLE2).

[mout1234]

Maclé serait le nom du contrôle dans le formulaire?

Il s'agit d'un exemple de critère de sélection. Ici, maclé pourrait représenter un champ numérique sur lequel porte ta recherche, dont la valeur est sélectionnée par l'utilisateur dans une liste déroulante du même nom.

Autre Exemple:

Code :

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

1
2
 
" WHERE Pays ='" & Me!cboPays & "'"