Désactiver le menu contextuel "Insérer" pour une ligne

[Compte Supprimé 979]

Bonjour à toutes et à tous,

J'ai les neurones qui sont en train de griller

Je n'arrive pas à désactiver le menu contextuel "Insérer" lorsque que je sélectionne une ligne

Voici mon code pour le moment

With Application.CommandBars("Row")
      '.FindControl(ID:=??).Enabled = False  ' Insert
      .FindControl(ID:=293).Enabled = False  ' Delete
      .FindControl(ID:=3125).Enabled = False  " Clear Contents
    End With

Si je regarde la liste Id chez Microsoft
Liste de num

Je ne trouve pas l'ID correspondant ?

Quelqu'un aurait une idée

D'avance merci.

 

[mécano41]

Re : Désactiver le menu contextuel "Insérer" pour une ligne

Bonjour,


J'ai trouvé cela :

With Application.CommandBars("Row")
  .FindControl(ID:=3183).Enabled = False
  .FindControl(ID:=293).Enabled = False
End With

Ici : (regarde bien les commentaires car il doit y avoir des raccourcis de touches qui peuvent encore fonctionner malgré tout...)
VBA - Griser les commande "Inserer" (dans menu contextuel) / Inserer-Supprimer lignes et colonnes

Cordialement

 

[Compte Supprimé 979]

Re : Désactiver le menu contextuel "Insérer" pour une ligne

Salut Mécano41

Punaise il fallait le trouver celui là ... "griser les commandes" ... j'aurais pu chercher longtemp

Merci beaucoup, je vais regarder ça de près

Au plaisir