IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Macros et VBA Excel Discussion :

Ouvrir un classeur sans barre d'outils en haut


Sujet :

Macros et VBA Excel

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    59
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 59
    Points : 52
    Points
    52
    Par défaut Ouvrir un classeur sans barre d'outils en haut
    Bonsoir à tous!
    Peut-on faire une macro qui enlève toutes les barres de menus du haut dans excel et qui n'affiche que la feuille (ou presque)?

  2. #2
    Expert éminent
    Avatar de fring
    Homme Profil pro
    Engineering
    Inscrit en
    Février 2008
    Messages
    3 900
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 61
    Localisation : Belgique

    Informations professionnelles :
    Activité : Engineering

    Informations forums :
    Inscription : Février 2008
    Messages : 3 900
    Points : 7 964
    Points
    7 964
    Par défaut
    Oui c'est possible

    A l'ouverture du classeur
    Code à insérer dans l'objet ThisWorkbook : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Workbook_Open()
    Application.DisplayFullScreen = True
    With ActiveWindow
        .DisplayGridlines = False
        .DisplayHeadings = False
        .DisplayHorizontalScrollBar = False
        .DisplayVerticalScrollBar = False
        .DisplayWorkbookTabs = False
    End With
    End Sub

    A la fermeture du classeur, on vide les cendriers, on donne un coup de balais et on remet tout en place
    Code à insérer dans l'objet ThisWorkbook : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    10
    Private Sub Workbook_BeforeClose(Cancel As Boolean)
    Application.DisplayFullScreen = False
    With ActiveWindow
        .DisplayGridlines = True
        .DisplayHeadings = True
        .DisplayHorizontalScrollBar = True
        .DisplayVerticalScrollBar = True
        .DisplayWorkbookTabs = True
    End With
    End Sub

    PS : si tu veux garder le quadrillage de la feuille, supprime la ligne .DisplayGridlines = False

  3. #3
    Membre du Club
    Profil pro
    Inscrit en
    Avril 2008
    Messages
    59
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2008
    Messages : 59
    Points : 52
    Points
    52
    Par défaut
    Merci, c'est exactement ce que je voulais!
    Bonne journée!

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 6
    Dernier message: 08/01/2009, 17h57
  2. Ouvrir excel sans barre d'outils
    Par Nanit6 dans le forum Excel
    Réponses: 9
    Dernier message: 07/08/2007, 19h26
  3. pdf sans barre d'outils sous le web
    Par m.zamoun dans le forum Documents
    Réponses: 2
    Dernier message: 09/06/2007, 01h58
  4. pdf sans barre d'outils sous le web
    Par m.zamoun dans le forum Balisage (X)HTML et validation W3C
    Réponses: 2
    Dernier message: 09/06/2007, 01h30
  5. pdf sans barre d'outils sous le web
    Par m.zamoun dans le forum Flash
    Réponses: 3
    Dernier message: 09/06/2007, 01h27

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo