Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel barre d'outils

barre d'outils

7 réponses
Avatar
srogeau
bonsoir a tous
comment desactiver certains menu (ex edition,outils, donnees, etc ) de
la barre d'outils excel a l'ouverture d'un classeur et les reactiver a
sa fermeture
j'ai vu un classeur ou ils etaient 'gris=E9s' et donc on ne pouvaient
pas les utiliser
merci de votre aide
Signaler un problème avec ce contenu

7 réponses

Supprimer
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
Avatar
Mgr T. Banni
bonsoir tout seul
pour désactiver (les boutons seront "grisés")
à mettre dans le module ThisWorkbook de ton classeur avec l'èvénement
Workbook_Open :

Application.CommandBars(1).Controls("Edition").Enabled = False
Application.CommandBars(1).Controls("Outils").Enabled = False
Application.CommandBars(1).Controls("Données").Enabled = False

pour réactiver (les boutons retrouveront leur couleur)
à mettre dans le module ThisWorkbook de ton classeur avec l'èvénement
Workbook Beforeclose :

Application.CommandBars(1).Controls("Edition").Enabled = True
Application.CommandBars(1).Controls("Outils").Enabled = True
Application.CommandBars(1).Controls("Données").Enabled = True

HTH
Mgr T.B.

a écrit dans le message de news:

bonsoir a tous
comment desactiver certains menu (ex edition,outils, donnees, etc ) de
la barre d'outils excel a l'ouverture d'un classeur et les reactiver a
sa fermeture
j'ai vu un classeur ou ils etaient 'grisés' et donc on ne pouvaient
pas les utiliser
merci de votre aide
Avatar
Mgr.Abile
Bonsoir,
Sans contredire Frère Banni, j'irai bien jusqu'à coller ces instructions
dans la procédure open du classeur perso :

Application.CommandBars(1).Controls("Edition").Enabled = True
Application.CommandBars(1).Controls("Outils").Enabled = True
Application.CommandBars(1).Controls("Données").Enabled = True

pour le cas malheureux d'un plantage avant fermeture du classeur...
--
News://news.microsoft.com/microsoft.public.fr.excel
Allez en paix
T.Abile
a écrit dans le message de
news:
bonsoir a tous
comment desactiver certains menu (ex edition,outils, donnees, etc ) de
la barre d'outils excel a l'ouverture d'un classeur et les reactiver a
sa fermeture
j'ai vu un classeur ou ils etaient 'grisés' et donc on ne pouvaient
pas les utiliser
merci de votre aide
Avatar
Patrick BASTARD
Bonsoir à tou(te)s

...Et pour ajouter mon grain de sel à ceux de l'épiscopat, pourquoi ne pas
les associer à l'événement activate / déactivate du classeur concerné afin
qu'elles n'interfèrent pas dans un fichier ouvert conjointement ?

--
Bien ,

Patrick BASTARD
patrick.bastardchezdbmail.com
a écrit dans le message de
news:
bonsoir a tous
comment desactiver certains menu (ex edition,outils, donnees, etc ) de
la barre d'outils excel a l'ouverture d'un classeur et les reactiver a
sa fermeture
j'ai vu un classeur ou ils etaient 'grisés' et donc on ne pouvaient
pas les utiliser
merci de votre aide
Avatar
srogeau
On 28 fév, 19:40, "Patrick BASTARD"
wrote:
Bonsoir à tou(te)s

...Et pour ajouter mon grain de sel à ceux de l'épiscopat, pourquoi n e pas
les associer à l'événement activate / déactivate du classeur conc erné afin
qu'elles n'interfèrent pas dans un fichier ouvert conjointement ?

--
Bien ,

Patrick BASTARD
patrick.bastardchezdbmail.com
a écrit dans le message denews:7d8e8fd3-59d2-4a91-ae2
bonsoir a tous
comment desactiver certains menu (ex edition,outils, donnees, etc ) de
la barre d'outils excel a l'ouverture d'un classeur et les reactiver a
sa fermeture
j'ai vu un classeur ou ils etaient 'grisés' et donc on ne pouvaient
pas les utiliser
merci de votre aide



merci pour vos reponses
Avatar
LSteph
Bonsoir,
et si cela disait:

with Application.CommandBars(1)
.Controls("Edition").Enabled = True
.Controls("Outils").Enabled = True
.Controls("Données").Enabled = True
end with


'lSteph
Avatar
Philippe.R
Bonjour,
Pas si con puisque plus concis ;o))
Et pan sur la mitre !
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"LSteph" a écrit dans le message de
news:
Bonsoir,
et si cela disait:

with Application.CommandBars(1)
.Controls("Edition").Enabled = True
.Controls("Outils").Enabled = True
.Controls("Données").Enabled = True
end with


'lSteph


Avatar
Mgr T. Banni
et si la mitre te filait une grosse...calotte, mécréant?
bon, ok, l'steph, dont la charité chrétienne laisse et laissera à désirer, a
fait plus court...j'avais, pour ma part, tenter sans succès un p'tit coup de
Array....
tandem vos absolvo
Mgr T.B.


"Philippe.R" <AS_rauphil_chez_wanadoo.fr> a écrit dans le message de news:

Bonjour,
Pas si con puisque plus concis ;o))
Et pan sur la mitre !
--
Avec plaisir
http://dj.joss.free.fr/trombine.htm
http://jacxl.free.fr/mpfe/trombino.html
Philippe.R
Pour se connecter au forum :
http://www.excelabo.net/mpfe/connexion.php
News://news.microsoft.com/microsoft.public.fr.excel
"LSteph" a écrit dans le message de
news:
Bonsoir,
et si cela disait:

with Application.CommandBars(1)
.Controls("Edition").Enabled = True
.Controls("Outils").Enabled = True
.Controls("Données").Enabled = True
end with


'lSteph