pb avec vba excel

patrick87

XLDnaute Nouveau
Bonjour,
Novice en VBa je cherche a eliminer des lignes dans un tableau excel à l'aide de boucles . Explication dans le fichier joint.
Merci de votre aide
 

Pièces jointes

  • Classeur1.xls
    16 KB · Affichages: 54
  • Classeur1.xls
    16 KB · Affichages: 54
  • Classeur1.xls
    16 KB · Affichages: 61

cbea

XLDnaute Impliqué
Re : pb avec vba excel

Bonsoir patrick87,

J'ai rajouté un bouton "Extraire" qui permet d'afficher les lignes souhaitées.

J'espère que cela conviendra.

@+
cbea
 

Pièces jointes

  • Classeur1_v1.xls
    28.5 KB · Affichages: 55
  • Classeur1_v1.xls
    28.5 KB · Affichages: 54
  • Classeur1_v1.xls
    28.5 KB · Affichages: 55

skoobi

XLDnaute Barbatruc
Re : pb avec vba excel

Bonsoir,

voici un exemple de macro:

Code:
Sub test()
For lig = [A65536].End(xlUp).Row To 7 Step -1
    If Range("A" & lig).Value = Range("A" & lig + 1).Value Then Range("A" & lig & ":B" & lig).Delete Shift:=xlUp
Next
End Sub
 

Statistiques des forums

Discussions
312 112
Messages
2 085 415
Membres
102 885
dernier inscrit
AISSOU