Supprimer un SpinButton

[pedrofabien1986]

Bonjour,

Je cherche désespérément un code pour supprimer tous les SpinButton de ma colone.

J'ai essai les .Clear, les .Delete

Mais je n'y arrive pas.

Help Please

 

[Pierrot93]

Re : Supprimer un SpinButton

Bonjour,

quel type de "spinbutton" ? de la barre d'outils formulaire ou de la boîte à outils controles ?

bonne journée
@+

 

[Pierrot93]

Re : Supprimer un SpinButton

Re,

pour supprimer des contrôles de la boîte à outils contrôles, et ce sur la feuille active, colonne A :

Option Explicit
Sub test()
Dim c As OLEObject
For Each c In ActiveSheet.OLEObjects
    If TypeName(c.Object) = "SpinButton" Then
        If c.TopLeftCell.Column = 1 Then c.Delete
    End If
Next c
End Sub

 

[pedrofabien1986]

Re : Supprimer un SpinButton

Merci beaucoup.
C'est exactement ça que je cherchais.