Réduction de la fenêtre Access dès le démarrage

Réduction de la fenêtre Access dès le démarrage - VB/VBA/VBS - Programmation

Marsh Posté le 14-11-2008 à 22:05:44    

Bonjour, voilà mon problème, j'ai créé un formulaire du nom "Menu Principal" pour qu'il s'ouvre dès le démarrage d'Access, je l'ai fait avec une macro Autoexec, pas de problème jusqu'à la, mais le problème réside dans la fermeture de la fenêtre de Access, je voudrais avoir seulement mon "Menu Principal" à l'écran en grand, comme une 'application autonome' ma procédure est la suivante :  
 
Private Sub Form_Activate()
 
DoCmd.Minimize  
 
End Sub
 
Elle permet de réduire la fenêtre Access mais malheuresement on est obligé de ré-ouvrir la fenêtre Access pour que mon formulaire soit là ...
 
Merci de votre aide en avance  :)

Reply

Marsh Posté le 14-11-2008 à 22:05:44   

Reply

Marsh Posté le 14-11-2008 à 22:08:56    

Pas besoin de te faire chier avec du code VBA pour ça, y'a tout ce qu'il faut sous Access en standard pour planquer la fenêtre de base et afficher ce que tu veux.
 
Fait un tour dans le menu Outils\Démarrage, là tu peux choisir un Formulaire à afficher, et planquer la fenêtre Access (case "Affich. la fen. de base de données)

Reply

Marsh Posté le 14-11-2008 à 22:41:24    

Désolé mais j'ai oublié de dire que je possède Access version 2007, il n'y a donc pas de outils/démarrage, a part qu'il soit planquer

Reply

Marsh Posté le 14-11-2008 à 22:47:07    

Ouais ça doit porter un autre nom, mais c'est forcément quelque part :)

Reply

Marsh Posté le 14-11-2008 à 22:48:36    

D'après ce que j'ai trouvé, c'est apparemment dans le bouton office, puis dans options Access, et enfin dans l'onglet base de donnée active [:petrus dei]

Reply

Marsh Posté le 14-11-2008 à 23:21:02    

Merci, j'ai déjà réussi à enlever le petit menu à droite mais bon j'ai toujours pas réussi à fermer la fenêtre access et juste à avoir mon application

Reply

Marsh Posté le 15-11-2008 à 13:16:06    

Attention, ton application ne peut pas apparaître vraiment "toute seule" à 100%, y'aura toujours obligatoirement la fenêtre Access autour.
 
Tu peux juste masquer la fenêtre avec la liste des tables & formulaire, mais pas l'ensemble

Reply

Marsh Posté le 16-11-2008 à 15:19:46    

Ok, parce que avec Excel j'avais réussi à réduire la fenêtre Excel et à faire apparaitre juste l'application mais comme il y a les changements de code VB suivant Access et Excel, benh bien sur le code d'Excel ne fonctionne pas sur Access mais bon c'est déjà bien qu'il n'y est plus le petit menu :)

Reply

Marsh Posté le 17-11-2008 à 16:38:55    

Bonjour
 

FlorentG a écrit :

Pas besoin de te faire chier avec du code VBA pour ça

FlorentG a écrit :

Attention, ton application ne peut pas apparaître vraiment "toute seule" à 100%, y'aura toujours obligatoirement la fenêtre Access autour.
 
Tu peux juste masquer la fenêtre avec la liste des tables & formulaire, mais pas l'ensemble

Non, d'où l'interêt du VBA... (ou de se faire ch**r avec :lol: )
 

pc_67 a écrit :

Ok, parce que avec Excel j'avais réussi à réduire la fenêtre Excel et à faire apparaitre juste l'application mais comme il y a les changements de code VB suivant Access et Excel, benh bien sur le code d'Excel ne fonctionne pas sur Access mais bon c'est déjà bien qu'il n'y est plus le petit menu :)

Oui avec Excel un Application.Visible=False suffit mais avec Access regarde de ce coté, il faut juste mettre ton formulaire en formulaire indépendant :
 

Citation :

'Déclaration API
 Const SW_HIDE = 0             'Hide the window.
  Const SW_MAXIMIZE = 3         'Maximize the window.
  Const SW_MINIMIZE = 6         'Minimize the window.
  Const SW_RESTORE = 9          'Restore the window (not maximized nor minimized).
  Const SW_SHOW = 5             'Show the window.
  Const SW_SHOWMAXIMIZED = 3    'Show the window maximized.
  Const SW_SHOWMINIMIZED = 2    'Show the window minimized.
  Const SW_SHOWMINNOACTIVE = 7  'Show the window minimized but do not activate it.
  Const SW_SHOWNA = 8           'Show the window in its current state but do not activate it.
  Const SW_SHOWNOACTIVATE = 4   'Show the window in its most recent size and position but do not activate it.
  Const SW_SHOWNORMAL = 1       'Show the window and activate it (as usual).
   
  Public Declare Function ShowWindow Lib "User32" (ByVal hWnd As Long, ByVal nCmdShow As Long) As Long
 
 
'minimise la fenetre access et active le formulaire
Function Fenetre_Modale(pForm As Form)
  ShowWindow Application.hWndAccessApp, SW_HIDE
  ShowWindow pForm.hWnd, SW_SHOWNORMAL
  ShowWindow Application.hWndAccessApp, SW_SHOWMINNOACTIVE
End Function

Pas tetsé sous 2007, mais ca tourne en 2003, donc pas de raisons.
 
Cordialement


Message édité par SuppotDeSaTante le 17-11-2008 à 16:41:18

---------------
Soyez malin, louez entre voisins !
Reply

Marsh Posté le 17-11-2008 à 22:13:52    

Merci de ton aide, cette partie ce place aussi dans le Private Sub Form_Activate() ?

Reply

Marsh Posté le 17-11-2008 à 22:13:52   

Reply

Marsh Posté le 17-11-2008 à 22:58:02    

Plutot dans un module et tu appelles la fonction avec en parametre ton formulaire dans un form_activate pourquoi pas.
Genre :
Fenetre_Modale Forms("NomDeTonFormulaire" )
ou si tu es dans form_activate :
Fenetre_Modale Me

Message cité 1 fois
Message édité par SuppotDeSaTante le 17-11-2008 à 23:04:44

---------------
Soyez malin, louez entre voisins !
Reply

Marsh Posté le 18-11-2008 à 20:19:30    

Ok, c'est bon ca marche, merci de ton aide :D
 
EDIT: Maintenant que ca marche  :D J'ai mis que mon formulaire soit en 'plain écran' DoCmd.Maximize, mais il n'est pas au centre, même avec les propriétés centrer sur activé  :??:


Message édité par pc_67 le 18-11-2008 à 20:46:56
Reply

Marsh Posté le 19-11-2008 à 10:39:50    

Ah ben voilà :jap: Heureusement qu'on peut faire appel à l'API Win32, merci du truc

Reply

Marsh Posté le 19-11-2008 à 14:12:54    

Bon j'ai réduit mon formulaire qu'il soit bien au centre, c'est pas plus mal, par contre sur le menu principal j'ai des 'minis' applications qui s'ouvrent en cliquant sur des boutons, rien d'arnomal jusqu'ici mais le problème vient quand je faire une 'mini' application, au lieu de retourner sur le menu principal comme les autres que le font parfaitement, elle retourne sur l'interface ACCESS mais c'est la seule application qui dispose d'un calendrier, quand je le désactive bien sur ca marche et quand je change de dates il retourne automatiquement sur l'interface ACCESS, personne sais comment faire pour qu'il reste sur mon interface 'cachée' ?

Reply

Marsh Posté le 20-11-2008 à 09:36:42    

Je suis désolé, mais malgré le fait d'avoir lu plusieurs fois, j'ai rien compris... :lol:


---------------
Soyez malin, louez entre voisins !
Reply

Marsh Posté le 20-11-2008 à 21:19:52    

:lol: Bon je l'ai posté dans la précipitation mais bon ca fait rien vous m'avez déjà énormement aidé et j'en suis fier  ;)

Reply

Marsh Posté le 20-11-2008 à 22:28:15    

Sinon expose plus clairement, aucun souci pour te filer un coup de main ;)


---------------
Soyez malin, louez entre voisins !
Reply

Marsh Posté le 20-11-2008 à 22:54:41    

Nan, c'est bon enfaite le problème que j'avais n'est que sous Access 2007, en cours on a Access 2001 je crois et ca marche parfaitement  ;)

Reply

Marsh Posté le 23-03-2009 à 17:39:30    

bonsoir ! je suis débutant et j'ai pris la fonction que vous avez proposé mais je ne sais pas où la mettre j'ai essayé de la mettre dans : forme_activate mais ça marche pas !! j'ai access 2007 et j'espère avoir une réponse aussi rapide que possible S.V.P
 
merci d'avance de votre aide !!!!!!!!!

Reply

Marsh Posté le 24-03-2009 à 09:12:13    

Bonjour
 
Le nb de point d'exclamation ne fera pas repondre plus vite hein.
 
Quant à ta question, tout est expliqué plus haut, il suffit de lire :

SuppotDeSaTante a écrit :

Plutot dans un module et tu appelles la fonction avec en parametre ton formulaire dans un form_activate pourquoi pas.
Genre :
Fenetre_Modale Forms("NomDeTonFormulaire" )
ou si tu es dans form_activate :
Fenetre_Modale Me


 
Cordialement


Message édité par SuppotDeSaTante le 24-03-2009 à 09:12:38

---------------
Soyez malin, louez entre voisins !
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed