Discussion :

[jpclabaux]

Salut,

Il y a quelques semaines j'ai modifié la commande de suppression des feuilles pour utiliser une macro à la place de la commande par défaut.
Je dois remettre la commande par défaut mais je ne sais plus comment faire.

Qui peut m'aider?

Merci,
Jean

[Theze]

Bonjour,

Avec ceci :

Code :

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

1
2
 
Application.CommandBars("Ply").Controls("&Supprimer").Enabled = True

Hervé.

[jpclabaux]

Ça n'a pas fonctionné.
J'ai fini par trouver la solution que voici:

Code :

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

1
2
3
4
5
Sub resetMenu()
For i = 1 To Application.CommandBars.FindControls(ID:=847).Count
    Application.CommandBars.FindControls(ID:=847).Item(i).Reset
Next
End Sub

847 = delete sheet

Merci quand même pour ton aide