macro pour delete de "boutons"

takeiteasy · 1 Juin 2008

bonjour à tous,

par une erreur de manipulation (recopie d'un autre tableau) je pense j'ai pollué certaines feuilles excel2007 avec plusieurs centaines d'objets de type "bouton".

y a-t-il moyen de les deleter par une macro?
J'ai commencé à les éliminer par le voler de sélection mais cela provoque plantage etc et en plus cela est tres lent

merci d'avance

take it easy

Spitnolan08 · 2 Juin 2008

Re : macro pour delete de "boutons"

Bonsoir,

Une solution :

Code:

Sub DetruitCB()
Dim cb As Shape
For Each cb In ActiveSheet.Shapes
    If Left(cb.Name, 13) = "CommandButton" Then cb.Delete
Next
End Sub

Cordialement

takeiteasy · 2 Juin 2008

Re : macro pour delete de "boutons"

merci beaucoup

macro pour delete de "boutons"

takeiteasy

XLDnaute Nouveau

Spitnolan08

XLDnaute Barbatruc

takeiteasy

XLDnaute Nouveau

Discussions similaires