baguette magique svp

Gérard DEZAMIS

XLDnaute Accro

• 24 Avril 2006

• #2

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]

 

Pièces jointes

• SupprimerLigneSiCoche.zip

  12.6 KB · Affichages: 23

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 24 Avril 2006

• #3

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

Cliquez pour agrandir...

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

 

Vote positif 0 Vote négatif

Gérard DEZAMIS

XLDnaute Accro

• 24 Avril 2006

• #4

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

 

Vote positif 0 Vote négatif

Gibson94

Nous a quitté

Repose en paix

• 24 Avril 2006

• #5

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 ?

 

Pièces jointes

• CaseAcocher.zip

  23.3 KB · Affichages: 35
• CaseAcocher.zip

  23.3 KB · Affichages: 26
• CaseAcocher.zip

  23.3 KB · Affichages: 27

Vote positif 0 Vote négatif

Gérard DEZAMIS

XLDnaute Accro

• 24 Avril 2006

• #6

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

 

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 24 Avril 2006

• #7

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]

 

Pièces jointes

• XLD_Auto_Generation_Destruction_OLEObjects_CheckBox.zip

  22.2 KB · Affichages: 24

Vote positif 0 Vote négatif

_Thierry

XLDnaute Barbatruc

Repose en paix

• 25 Avril 2006

• #8

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]

 

Vote positif 0 Vote négatif