Suppression Formulaire

Bonjour à vous tous,

J'ai le fichier en pièce jointe sur lequel j'aimerais enlever le formulaire qui se trouve en colonne L

Pourriez-vous m'aider svp ?

Merci à tous d'avance.

Bonjour,

Tu peux supprimer les CheckBox avec le code suivant :

Sub Suppr_CheckBox()
 For I = 1 To ActiveSheet.Shapes.Count
 Nom = ActiveSheet.Shapes(I).Name
    If Left(Nom, 8) = "CheckBox" Then
        ActiveSheet.Shapes.Range(Array(Nom)).Delete
    End If
 Next
End Sub

Ou alors, manuellement, dans le ruban "Mise en page", affiche le volet sélection et supprime chaque objet.

Parfait merci beaucoup.