Discussion :

[MaverickRozay]

Bonjour tous le monde,

J'ai un soucis avec une macro Excel, mon souhait est de créer une macro qui compare le contenu de chaque cellule d'une colonne A dans une feuille A avec le contenu d'une colonne B dans une feuille B.
Si il y a des correspondances entre les deux colonnes des deux fichiers je veux supprimer les lignes présente dans la feuille A. Mais surtout pas supprimer celle de la feuille B (fichier de référence).

Voila ma macro, elle compil mais quand je la lance Excel plante. Je pense que je fais trop de tour de boucle ou même pire une boucle infinie...:/

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
Sub Vivier()
Dim k As Integer
Dim i As Integer
Dim aaa As Variant
    aaa = Array("A", "B", "C", "D", "E", "F", "G", "H", "I", "J", "K", "L", "M", "N", "O", "P", "Q", "R", "S", "T", "U", "V", "W", "X", "Y", "Z", "AA", "AB", "AC", "AD", "AE", "AF", "AG", "AH", "AI", "AJ", "AK", "AL", "AM", "AN", "AO", "AP", "AQ", "AR", "AS", "AT", "AU", "AV", "AW", "AX", "AY", "AZ")
Dim colonne_libellestandard As Variant
 
       For k = 1 To 100
            For h = 1 To 833
            If Sheets("N°Banc").Range("C" & k).Value = Sheets("Export").Range("J" & h).Value Then
                Rows(h).Delete
            End If
            Next h
        Next k
 
End If
'Next i
End Sub

Merci d'avance pour l'aide que vous pourriez m'apporter.

[L'Albatros]

Bonjour,

Il y a des lignes dont je ne vois pas l'intérêt dans ton code.

Essaie ceci (je l'ai fait à la volée):

Code :

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

1
2
3
4
5
6
7
8
9
Dim compteur_boucle_A As Long
Dim compteur_boucle_B As Long
For compteur_boucle_A = 1 To Range("C1").End(xlDown).Row
For compteur_boucle_B = 1 To Range("J1").End(xlDown).Row
If Sheets("A").Range("C" & compteur_boucle_A) = Sheets("B").Range("J" & compteur_boucle_B) Then
Sheets("A").Range("C" & compteur_boucle_A).EntireRow.Delete
End If
Next compteur_boucle_B
Next compteur_boucle_A

Le mieux serait d'utiliser des variables tableaux mais bon