Discussion :

[gedechp]

D'avance merci pour un chti renseignement

Je cherche vainement comment distinguer
"Protéger la feuille" du menu Outil/Protection
Et "Protéger la feuille" de la barre d'outils Protection

J'ai écrit

Code :

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

 Application.CommandBars("Protection").Controls("Protéger la feuille...").Enabled = False

Ce code désactive "Protection" de la barre d'outils

Comment faire pour désactiver également Protection de la Barre de menu ?

Cordialement
GERARD

[tirex28]

Bonsoir,

Ceci désactive toutes les occurences de la commandes "Proteger la feuille" sur toutes les barres d'outils.

Code :

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

1
2
3
4
5
6
7
 
Dim i As Integer
With Application.CommandBars.FindControls(, 893)
    For i = 1 To .Count
        .Item(i).Enabled = False
    Next
End With

Pour rétablir le fonctionnement executer la meme chose avec True en lieu et place de False.

Cordialement,

Tirex28/

[gedechp]

merci a tous pour votre aide