baguette magique svp

[london]

bonjour tt le monde!
g besoin d'un coup de baguette magique svp.

je vous explique mon probleme:
j'ai creé un tableau avec des elements (nom et prenom) et une colonne 'supprimer' contenant des chekbox;
en fait ce que je voudrais fre c'est pouvoir supprimer un ou plusieurs ligne que j'aurais choisis grace aux chekbox.
Ainsi qd je cliquerai sur le bouton 'supprimer' le ou les lignes en question devraient disparaitre..

je vous joins mon probleme...

merci... [file name=helpme.zip size=7891]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/helpme.zip[/file]

 

[Gérard DEZAMIS]

Bonsoir London
Un petit essai qui t'évitera de créer de multiples checkbox (on ne sait jamais la page fait 65356 lignes!)
Un double clic dans la colonne A coche ou décoche la cellule le bouton supprimer fait ensuite le boulot demandé

@+GD

*Evite les tt, g, qd (c a ga 100) [file name=SupprimerLigneSiCoche.zip size=12854]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/SupprimerLigneSiCoche.zip[/file]

 

[_Thierry]

Bonsoir Gérard, london, le Forum

Oui c'est bien mieux qu'avec des CheckBocx, dacodac avec toi Gérard.

Par contre attention si on veut supprimer plusieurs personnes adjacentes à la fois, il faut actioner le Bouton Supprimer plusieurs fois, c'est toujours l'éternel Problème des Rows Delete...

Je conseille cette modif pour le Bouton

Private Sub CommandButton1_Click()
Dim Cell As Range
Dim L As Integer, i As Integer

L = Range('A5000').End(xlUp).Row

For i = L To 2 Step -1
    If Cells(i, 1).Value = 'a' Then
        Cells(i, 1).EntireRow.Delete
    End If
Next i
End Sub

Bonne Nuit
[ol]@+Thierry[/ol]

 

[Gérard DEZAMIS]

Salut Thierry

Merci du Tuyau
je ne m'étais même pas rendu compte de cet ennui.
J'avais essayé bien entendu ... avec des cellules non contiguës !

London va bien commencer sa journée
Bonne nuit

@+GD

 

[Gibson94]

Bonjour London, Gégé, Thierry, le forum,

Cà va bien par ici, je peux proposer également un p'tit truc.
Je propose soit la suppression des lignes et les cases à cocher avec dans la foulée... ou alors, beaucoup plus subtil... Supprimer les cellules qui n'ont plus rien à faire là...lol...

[file name=CaseAcocher.zip size=23890]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/CaseAcocher.zip[/file]

Bon je vais me coucher, j'ai raté l'heure... me semble t-il ?

 

[Gérard DEZAMIS]

Re Thierry et London

Salut Guy
Bien joué ! Dis tu te couches tard ou tu te lèves tôt pour trouver des trucs comme çà ?
Bien amicalement
@+GD

 

[_Thierry]

Bonjour mes chers amis Gérard et Guy, Bonjour LOndon, le Forum

Et oui Gérard, c'est un 'Classique' le Row-Delete, il faut le Prendre à l'envers, sinon il se décale puisque la Ligne est partie sans laisser d'adresse...

Bon en espérant que London repassera par XLD en prenant l'EuroStar !!

Si on veut 'jouer' avec les Checbox 'ActiveX' OLEObjects, alors je vous conseille cette Démo les amis

Bonne Journée
[ol]@+Thierry[/ol]


PS ne passera vraissemblablement pas sous Mac [file name=XLD_Auto_Generation_Destruction_OLEObjects_CheckBox.zip size=22748]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/XLD_Auto_Generation_Destruction_OLEObjects_CheckBox.zip[/file]

 

[_Thierry]

Re:London Calling !!! Baguette Magique svp

Bonsoir les amis, Bonsoir London !

Bon juste au cas où tu aies perdu le Fil !

Trois Fichiers différerents ce serait dommage !

Bonne Nuit

[ol]@+Thierry[/ol]