Discussion :

[jawed]

a toutes et a tous
j'ai une table Excel ou figure 7 collones deux entre eux et User Status et l'autre Phone ma question est il possible de suprimé tous les les lignes de Phone similaire et qui comporte seulement un User Status egal a suspended
codialement

[SilkyRoad]

bonjour

Tu peux adapter ce type de procédure

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
Option Explicit
Option Compare Text
 
 
Sub Test()
    Dim i As Integer, j As Integer
 
    'Recupère la derniere ligne vide du tableau
    i = Range("A65536").End(xlUp).Row
 
    'Boucle sur les lignes du tableau
    'de la derniere ligne vers le haut
    For j = i To 2 Step -1
        'Si la colonne C contient la chaine "suspended"
        If Cells(j, 3) = "suspended" Then
            'Compte le nombre de fois qu'apparait le numéro
            'de téléphone dans la colonne F.
            If Application.WorksheetFunction. _
                CountIf(Columns(6), Cells(j, 6)) > 1 Then _
                Rows(j).Delete 'supprime la ligne
        End If
    Next j
End Sub

bon week end
michel

[jawed]

c'est parfait SilkyRoad
cordialement