Discussion :

[moimemessssssssss]

bonjour,

a partir dune base access "sauvegarde" j'ai un code vba pour ouvrir une base test" et lancer le formulaire"adresse" se trouvant dans cette base.
la base s'ouvre et le formulaire se lance bien mais a la fin du code cette base test se ferme automatiquement alors que je n'ai pas demandé sa fermeture
savez vous pourquoi?
voici le code

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
 
Dim db As dao.Database
Dim AppAccess As Access.Application
Dim Chemin As String
Dim base As String
Dim formulaire As String
 
Chemin = "G:\SauvegardePersonnelle\"
base="test.accdb"
 fomulaire="adresse"
 
Set AppAccess = New Access.Application
    With AppAccess
        .Visible = True
        .DoCmd.RunCommand acCmdAppMaximize
       .OpenCurrentDatabase (Chemin & Base)
        .DoCmd.OpenForm Formulaire
        .DoCmd.RunCommand acCmdAppMaximize
   End With
 
 
Set db = Nothing
 
Set AppAccess = Nothing
 
 
 
End Sub

merci

[pyloupylou]

attention

Access ne s'arrete pas tu ouvres le formulaire soit.... mais ensuite tu fermes tout
si tu veux qu'il s'arrête sur l'écran regarde les options d'ouverture du formulaire sur docmd.openform ( windowsmode - moi j'ouvrirai en acdialog )

[moimemessssssssss]

merci

en fait en mode acdialog, le formulaire n'apparrait pas directement à l'écran (il doit être caché derrière) il faut cliquer sur l'icone Access dans la barre des tâches pour le voir.
cela vient de la configuration Access?

sinon en mode Acdialog, le code vba qui a permis de lancer ce formulaire ne se ferme pas tout de suite mais se ferme au moment ou je ferme le formulaire qui a été ouvert. c'est normal?

merci

[pyloupylou]

le acdialog ouvre normalement en ecran modal et ton code stoppe, en revanche dès que tu vas fermer ton ecran il continue en séquence et comme tu fermes tout, et bien bêtement il ferme tout....c'est vraiment stupide un ordinateur, ça fait ce qu'on lui dit de faire....

si tu disais plutôt ce que tu souhaites faire...

[moimemessssssssss]

Bonjour,

Merci pour la réponse,

En fait, j’ai plusieurs bases Access (je nomme ici i) et j’ai créé une autre base access amont (je nomme ici A) qui pointe sur chacune de ces bases i.
Donc la base A permet d’ouvrir des bases i pour les mettre à jour : prix, nom, adresse, date….

Et un des codes vba se trouvant dans la base A permet d’ouvrir un formulaire d’une base i , code que j’ai mis précédemment.

Voila si vous avez une idée.
merci

[pyloupylou]

c'est un peu particulier comme organisation, non pas d'avoir une base qui est connectée à d'autre bases, mais de partir d'une base et ouvrir un écran sur une autre base

pourquoi ne pas centraliser les traitement à un seul endroit et travailler par tables attachées ?

[moimemessssssssss]

en fait je n'ai pas lié les tables car des formulaires spécifiques se trouvent dans chaque base access i permettant de mettre à jour des données dans les tables
il faudrait aussi migrer les formulaire....
comme il y a de nombreux formulaires et de tables je trouver plus simple
de créer une base amont permettant d'ouvrir chaque base pour les metttre à jour
voila.

comment faire ?

merci

[pyloupylou]

tu sais l'export fonctionne bien mais si tu préfères regarde http://access.developpez.com/faq/?pa...ss#OuvrBddForm