Lancement d'access comme programme

**scoobydoos** · 18/10/2010, 20h51

Bonjour,

Une question sur l'ouverture d'une bdd Access.
Peut-on faire avec une bdd finie, lorsqu'on ouvre celle-ci, qu'il y est uniquement une fenêtre de démarrage (formulaire) sans que l'on est Access en arrière plan ?
Comme si on lancait une appli...
C'est assez clair mon explication ?

Merci par avance

@+

**patmasse** · 19/10/2010, 13h52

Bonjour,
Tu devrais utiliser le runtime d'access (gratuit).
Dans ta base tu crée un formulaire x et
- Soit une macro qui l'ouvre et que tu nomme "autoexec"
- Soit Fichier, Options, Base de données active et tu selectionnes Afficher le formulaire x.

**scoobydoos** · 19/10/2010, 19h52

Salut,

Ok bon je vais aller voir si je trouve un tuto car comme ca, c'est pas si simple...

merci

@+

**loufab** · 19/10/2010, 22h55

Bonjour,

Il y aura toujours au minimum le splashscreen d'access qui s'ouvrira au démarrage.
Regarde le tuto sur le splashscreen sur mon espace perso.
Regarde également les différents tuto sur le déploiement d'application.

Cordialement,

**scoobydoos** · 20/10/2010, 09h10

Bonjour,

merci je vais regarder ca.
Au fait c'est où ton tuto ?

@+

**loufab** · 20/10/2010, 09h24

Le tuto sur le splashscreen est sur ma page perso

http://loufab.developpez.com

Les différents tutos sur le sujet sont sur la page Tutoriels dont un bouton d'accès est présent au dessus (entre Word et Outlook).

Bonne lecture.

jojo5650 · 20/10/2010, 12h07

autre piste
regarde du côté de

Code :

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

Application.CommandBars

tu devrais y trouver ton bonheur

**scoobydoos** · 20/10/2010, 18h42

Salut,

merci mais où et comment ?

@+

jojo5650 · 21/10/2010, 23h45

teste ceci
avec enabled sur false les barres de menu seront invisibles

Code :

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

1
2
3
4
5
6
7
8
 
private sub Form_load()
 
Dim cmb As Office.CommandBar
For Each cmb In Application.CommandBars
    cmb.Enabled = False
Next cmb
end sub

ne pas oublier de refaire tourner cette fonction; mais avec true pour réactiver les barres de menus.
j'ai trouvé cela à cette adresse http://www.developpez.net/forums/d58...n-commandbars/
jojo5650

**scoobydoos** · 25/10/2010, 14h51

Bonjour,

merci je vais essayer ca plus tard car si je n'arrive pas à remettre les barres d'outils, je ne vais plus pouvoir continuer

Je le garde dans un coin...

@+

**FreeAccess** · 25/10/2010, 19h40

Bonjour,

@ jojo5650..as-tu testé ta réponse sur une version ACC2010...

jojo5650 · 26/10/2010, 12h26

non car je ne n'utilise qu'access 2003

**loufab** · 27/10/2010, 21h21

Perso j'utilise ça :

Dans un module :

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
 
Option Compare Database
Option Explicit
Dim StateRibbon As Boolean
 
Function DisplayRibbon()
' Auteur      : Fabrice CONSTANS (MVP)
' Description : Affiche/cache le ruban
' ctrl+shift+R
 
Nz StateRibbon, False  ' 1er passage initialise à faux (ribbon invisible)
 
DoCmd.ShowToolbar "Ribbon", IIf(StateRibbon, acToolbarNo, acToolbarYes)
 
StateRibbon = Not StateRibbon  ' inverse la valeur
 
End Function