Discussion :

[a.petitjean1]

Bonjour à tous,

Dans le cadre de mon job je dois vérifier des données de catalogue produits.
Afin de m'aider dans cette tache j'ai réalisé un fichier avec des macros pour automatiser les vérifications.

Je bloque cependant sur un problème. J'ai récupéré une macro qui permet de supprimer totalement une ligne si dans la cellule X de la colonne Y la valeur est vrai.
Malheureusement cette macro ne fonctionne plus (alors qu'elle fonctionnait sur l'autre classeur).

J'aimerai comprendre le problème et surtout réussir à faire fonctionner cette macro.

Code :

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

1
2
3
4
5
6
7
8
9
10
11
 
Sub Suppression_Id_Variant()
Dim MyRange As Range
Dim L As Long
    Set MyRange = ActiveSheet.Range("A1").CurrentRegion
    For L = MyRange.Rows.Count To 1 Step -1
 
        If MyRange(L, 57).Value = True Then MyRange(L, 57).EntireRow.Delete
 
    Next
End Sub

Dans le fichier Joint il s'agit des Macros Suppression_doublons et de Suppression_Id_Variant.

Merci d'avance de votre aide.

Aurélien