Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Excel "personnaliser" de la Barre outils

"personnaliser" de la Barre outils

2 réponses
Avatar
Arzac
Bonjour
En voulant proteger les barre d'outils j'ai du faire une erreur car qd
j'ouvre une nouveau classeur le bouton "Personnaliser" est grisé tant en
bout de chaque barre d'outils que dans le menu Outils et dans Affichage /
Barre d'outils il n'est plus proposer J'ai ecrit cette macro mais elle n'a
aucun effet :

Sub BOControls()
Application.CommandBars("Tools").FindControl(ID:=797).Enabled = True
Application.CommandBars("Tools").FindControl(ID:=797).Visible = True
End Sub

Comment faire. Je m'apercois que si on enleve une fonction à Excel, il faut
imperativement la remettre avt de quitter le classeur car elle ne reapparait
pas avec les nouveaux classeurs. Merci pour votre aide

--
Amitiés
Arzac
Signaler un problème avec ce contenu

2 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
Alain CROS
Bonjour.

Application.CommandBars.DisableCustomize = False

Alain CROS

"Arzac" a écrit dans le message de news: eUo$
| Bonjour
| En voulant proteger les barre d'outils j'ai du faire une erreur car qd
| j'ouvre une nouveau classeur le bouton "Personnaliser" est grisé tant en
| bout de chaque barre d'outils que dans le menu Outils et dans Affichage /
| Barre d'outils il n'est plus proposer J'ai ecrit cette macro mais elle n'a
| aucun effet :
|
| Sub BOControls()
| Application.CommandBars("Tools").FindControl(ID:y7).Enabled = True
| Application.CommandBars("Tools").FindControl(ID:y7).Visible = True
| End Sub
|
| Comment faire. Je m'apercois que si on enleve une fonction à Excel, il faut
| imperativement la remettre avt de quitter le classeur car elle ne reapparait
| pas avec les nouveaux classeurs. Merci pour votre aide
|
| --
| Amitiés
| Arzac
|
|
|
Avatar
Arzac
Ca marche
Merci Alain



"Alain CROS" a écrit dans le message de news:

Bonjour.

Application.CommandBars.DisableCustomize = False

Alain CROS

"Arzac" a écrit dans le message de news:
eUo$
| Bonjour
| En voulant proteger les barre d'outils j'ai du faire une erreur car qd
| j'ouvre une nouveau classeur le bouton "Personnaliser" est grisé tant en
| bout de chaque barre d'outils que dans le menu Outils et dans Affichage
/
| Barre d'outils il n'est plus proposer J'ai ecrit cette macro mais elle
n'a
| aucun effet :
|
| Sub BOControls()
| Application.CommandBars("Tools").FindControl(ID:y7).Enabled =
True
| Application.CommandBars("Tools").FindControl(ID:y7).Visible =
True
| End Sub
|
| Comment faire. Je m'apercois que si on enleve une fonction à Excel, il
faut
| imperativement la remettre avt de quitter le classeur car elle ne
reapparait
| pas avec les nouveaux classeurs. Merci pour votre aide
|
| --
| Amitiés
| Arzac
|
|
|