Bonsoir,

J'ai cherche à créer un fichier .mde en vba.

J'ai essayé par Sendkeys, mais comme j'ai des barres de menus personalisées
Avec docmd.runcommand... j'ai trouvé une aide Microsoft

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Function GenerateMDEFile(MyPath As String)
   Dim NAcc As Access.Application
   Set NAcc = CreateObject("Access.Application")
   'Les lignes suivantes simulent l'acceptation du nom par
   'défaut, en cliquant sur Créer MDE, puis sur Enregistrer
   SendKeys MyPath & "{Enter}{Enter}"
   SendKeys "{Enter}"
   NAcc.DoCmd.RunCommand acCmdMakeMDEFile
   Set NAcc = Nothing
End Function
 
Private Sub Commande0_Click()
  GenerateMDEFile CurrentProject.Path & "\EvRP.mde"
End Sub
Ce code ouvre une seconde session d'Access ... en présentant la fenêtre d'enregistrement en .mde, le chemin et le nom de fichier sont corrects mais dès que e valide, cela me provoque un plantage général : fenêtre Access uniquement avec le fond, pas de menu... bref pas terrible.

Alors une idée peut être ?