Question sur le VBA :)

Bonjour,

J'aurais besoin de vos lumières pour un code que je n'arrive pas à mettre en pratique. :)

Pour l'instant j'ai ça :

Private Sub Commande7_Click()
On Error GoTo Err_Commande7_Click

    Dim stDocName As String

    stDocName = "R_ajout_tcandidats"
    stDocName = "R_ajout_tpassages"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

Exit_Commande7_Click:
    Exit Sub

Err_Commande7_Click:
    MsgBox Err.Description
    Resume Exit_Commande7_Click
    
End Sub

Et je voudrais en cliquant sur un bouton de commande lancer deux requêtes ajouts. Les deux requêtes prennent les données de la même table pour les coller dans deux tables différentes :)

Avec le code que j'ai mis plus haut, je n'arrive à lancer qu'une seule requête.

Merci pour votre aide. :)