J'ai pu voir sur le forum une réponse à cette question mais le code donné ne fonctionne pas.
En effet, j'ai essayé cela lorsqu'on clique sur un bouton de formulaire :
Mais j'ai un message d'erreur me disant que "La base est déjà ouverte". En réalité, Aixprimm_Radio.mdb fait référence aux mêmes tables que le fichier dans lequel je lance cette procédure, d'où le message d'erreur - je pense. Comment quitter ces tables et relancer le nouveau fichier sans fermer l'application Access (parceque j'ai essayé DoCmd.Quit avant l'ouverture, mais forcément, ça ferme tout) ? Je pense que ça doit pas être bien sorcier, mais je ne suis pas un expert en VBA ...
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11 Private Sub Mesures_Radio_Click() Dim stDocName As String Dim stLinkCriteria As String DoCmd.Close OpenCurrentDatabase "M:\Exploitation\Activités\Mesures radio\Aixprimm_Radio.mdb" Exit Sub ERREUR: MsgBox "Mesures_Radio_Click : " & err.Description, vbInformation, "Erreur N° " & err.Number End Sub
Merci d'avance,
Cordialement,
Partager