Discussion :

[basto]

Bonjour

Dans le cadre de la mise au point d'une feuille Excel, je souhaite inhiber l'accès au menu insérer d'une ligne.
Pour ce faire, j'ai trouvé dans la FAQ :

Code :

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

1
2
3
4
5
6
7
Sub Desactiver() 
    With Application.CommandBars("Row") 
        Set Ctrl = .FindControl(ID:=3181) ' Pour le menu insérer.
        Ctrl.Enabled = False 
        Set Ctrl = Nothing 
    End With 
End Sub

Cette macro se plante de temps en temps car le menu insérer prend l'ID 3183 au lieu de 3181.

Comment faire pour m'assurer que c'est le bon menu? Y a-t-il un idenfiant fixe ?

Par ailleurs, je souhaiterai ajouter mon propre menu d'insertion. Est ce possible?
Comment puis-je capter l'événement lorsque l'utilisateur choisi mon menu?

D'avance merci

A+

[patricktoulon]

peut etre alors tester son existance avnt de chercher a le modifier

Code :

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

1
2
3
4
Sub Desactiver() 
   for each bout in Application.CommandBars("Row") .controls
       if bout.id="3181" or bout.id="3183" then bout.enabled=false
 End Sub

pour les guillemets des nombres je suis pas sur a toi de voir
Au plaisir

[basto]

Bonjour

Merci pour ton aide.
J'espère qu'il n'y a pas d'autres subtilités dépendant du poste ou autres.
Le but est que cela marche qq soit le poste

A+