Bonjour
je suis novice sur Excel
aussi ma question pourra vous paraitre ridicule!!
j'ai créé un fichier excel avec une Macro qui va mettre à jour
quotidiennement des paramètres dans un autre programme.
pour une question visuelle, je voudrais que quand l'utilisateur ouvre ce
fichier, il tombe sur un affichage style programme (sans avoir les N° de
colonnes, de lignes , barre d'outils ... etc)
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Garette
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro et d'adapter le code ensuite.
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans
Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne :
Sub PourlAffichage()
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayOutline = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.ShowStartupDialog = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
.ShowWindowsInTaskbar = False
End With
End Sub
Sub PourLesBarresdOutils()
Application.CommandBars("Standard").Visible = False
'Etc .. pour les autres barres ...
End Sub
False ça disparait
True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro et
d'adapter le code ensuite.
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro et d'adapter le code ensuite.
Yansec
Merci bien mais je pensais plutot à un programme qui contiendrait mon fichier Excel avec un visuel Windows
merci je vais essayer ta macro "Garette" a écrit dans le message de news:
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro et d'adapter le code ensuite.
Merci bien
mais je pensais plutot à un programme qui contiendrait mon fichier Excel
avec un visuel Windows
merci je vais essayer ta macro
"Garette" <Garette@discussions.microsoft.com> a écrit dans le message de
news: 4BA78E37-7CC4-4C4D-9C96-DB6DC7E1BCBB@microsoft.com...
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans
Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne :
Sub PourlAffichage()
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayOutline = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.ShowStartupDialog = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
.ShowWindowsInTaskbar = False
End With
End Sub
Sub PourLesBarresdOutils()
Application.CommandBars("Standard").Visible = False
'Etc .. pour les autres barres ...
End Sub
False ça disparait
True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro
et
d'adapter le code ensuite.
Merci bien mais je pensais plutot à un programme qui contiendrait mon fichier Excel avec un visuel Windows
merci je vais essayer ta macro "Garette" a écrit dans le message de news:
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro et d'adapter le code ensuite.
André free
Bonjour, Si tu mets ta macro dans Thisworkbook et dans une Private Sub Workbook_Open() elle s'exécutera à l'ouverture du classeur
"Yansec" a écrit dans le message de news:ecb$
Merci bien mais je pensais plutot à un programme qui contiendrait mon fichier Excel avec un visuel Windows
merci je vais essayer ta macro "Garette" a écrit dans le message de news:
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro
et d'adapter le code ensuite.
Bonjour,
Si tu mets ta macro dans Thisworkbook et dans une
Private Sub Workbook_Open()
elle s'exécutera à l'ouverture du classeur
"Yansec" <btrivero@orange.fr> a écrit dans le message de
news:ecb$TJP9GHA.4740@TK2MSFTNGP03.phx.gbl...
Merci bien
mais je pensais plutot à un programme qui contiendrait mon fichier Excel
avec un visuel Windows
merci je vais essayer ta macro
"Garette" <Garette@discussions.microsoft.com> a écrit dans le message de
news: 4BA78E37-7CC4-4C4D-9C96-DB6DC7E1BCBB@microsoft.com...
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans
Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne :
Sub PourlAffichage()
With ActiveWindow
.DisplayGridlines = False
.DisplayHeadings = False
.DisplayOutline = False
.DisplayHorizontalScrollBar = False
.DisplayVerticalScrollBar = False
.DisplayWorkbookTabs = False
End With
With Application
.ShowStartupDialog = False
.DisplayFormulaBar = False
.DisplayStatusBar = False
.ShowWindowsInTaskbar = False
End With
End Sub
Sub PourLesBarresdOutils()
Application.CommandBars("Standard").Visible = False
'Etc .. pour les autres barres ...
End Sub
False ça disparait
True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la
macro
Bonjour, Si tu mets ta macro dans Thisworkbook et dans une Private Sub Workbook_Open() elle s'exécutera à l'ouverture du classeur
"Yansec" a écrit dans le message de news:ecb$
Merci bien mais je pensais plutot à un programme qui contiendrait mon fichier Excel avec un visuel Windows
merci je vais essayer ta macro "Garette" a écrit dans le message de news:
Bonjour,
Ca se passe principalement dans outils/options/Affichage et dans Affichage/Barre de formule, barre d'outils etc ...
En macro ça donne : Sub PourlAffichage() With ActiveWindow .DisplayGridlines = False .DisplayHeadings = False .DisplayOutline = False .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False End With With Application .ShowStartupDialog = False .DisplayFormulaBar = False .DisplayStatusBar = False .ShowWindowsInTaskbar = False End With End Sub
Sub PourLesBarresdOutils() Application.CommandBars("Standard").Visible = False 'Etc .. pour les autres barres ... End Sub
False ça disparait True ça apparait
Il est possible de faire les modifs souhaitées en enregistrerant la macro
