Supprimer une ligne grâce à un checkbox

[adi399]

Bonjour, j'aimerai pouvoir supprimer la ligne 3 lorsque ma checkbox1 est cochée...help
voici mon code:

Sub Macro4()
If CheckBox1.Value = True Then
Rows("3:3").Select
selection.delete Shift:=xlUp
End If
End Sub
merci beaucoup

 

[Robert]

Re : Supprimer une ligne grâce à un checkbox

Bonjour Adi, Bonjour le forum,

Elle est où cette CheckBox ? Dans une UserForm, sur un onglet ?
Essaie comme ça (si la checkbox est dans une userform UserForm1 (à adapter) :

Sub Macro4()
If UserForm1.CheckBox1.Value = True Then Rows(3).delete
End Sub

Ou comme ça pour une checkbox dans un onglet Feuil1 :

Sub Macro4()
Sheets("Feuil1").Shapes("CheckBox1").Select
If Selection.Object.Value = True Then Rows(3).Delete

On comprendrait certainement mieux avec un fichier exemple...

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

Mon classeur comportant de nombreuses données confidentielles je vous envoi un autre ci-joint avec mes explications!

J'ai peut-être mal utiliser les checkbox, il y a surement plus simple?

Merci d'avance pour votre aide

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

super je suis dans votre deuxième cas, seulement comment répéter cette opération pour chaque ligne? dois-je modifier le nom à chaque fois?

 

[Yaloo]

Re : Supprimer une ligne grâce à un checkbox

Bonjour adi399, Robert, le forum,

Difficile de faire avec des checkbox car quand tu supprimes la ligne tes N° de checkbox ne correspondent pas au N° de ligne.

Vois avec ceci :
Tu cliques sur la cellule en colonne D, cela te mets une coche ou te l'enlève si tu en as une.

Cliques sur le bouton, ça te supprime tes lignes.

A+

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

Merci énormément yaloo il me reste plus qu'à déchiffrer un peu le code je ne savais pas qu'on pouvait cocher des cellules directement !

Bonne journée à vous et à bientot!!

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

Re

J'ai amélioré mon fichier avec un userform de saisie!

je n'arrive pas à créer le code pour que la saisie soit faite à la fois sur la feuil2 et sur la feuille copie en même temps. (la feuille copie me permettrai de conserver une trace en cas d'erreur lors d'une supression de ligne dans la feuille1)

j'éspère que vous m'avez suivi

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

personne pour m'aider ?? je ne trouve rien sur les sujets du forum

 

[Yaloo]

Re : Supprimer une ligne grâce à un checkbox

Re,

Faut pas être si pressé, les bénévoles travaillent à leur rythme.

Vois ci-dessous

 

[adi399]

Re : Supprimer une ligne grâce à un checkbox

un GRAND merci Yaloo ! je vais rêver de userform cette nuit !!
à bientot !