A voir également:
- Comparer 2 colonnes excel
- Liste déroulante excel - Guide
- Déplacer une colonne excel - Guide
- Classer par ordre alphabétique excel plusieurs colonnes - Guide
- Formule moyenne excel plusieurs colonnes - Guide
- Fusionner 2 colonnes excel - Guide
2 réponses
Frenchie83
Messages postés
2240
Date d'inscription
lundi 6 mai 2013
Statut
Membre
Dernière intervention
11 août 2023
338
19 avril 2017 à 18:13
19 avril 2017 à 18:13
Bonjour
Pour une question de logique, j'ai affecté la colonne A à la colonne 1 et la colonne B à la colonne 2.
Cdlt
Pour une question de logique, j'ai affecté la colonne A à la colonne 1 et la colonne B à la colonne 2.
Sub Bouton1_Cliquer() Dim Colonne1 As Range, Colonne2 As Range, cellule As Range, Trouve As Range 'Compare les colonne A et B de la feuilles 1 Set Colonne1 = Range(("A2"), Range("A2").End(xlDown)) Set Colonne2 = Range(("B2"), Range("B2").End(xlDown)) 'Efface la plage de réception Range("C2:C65536").ClearContents 'Retranscrit les données différente dans la colonne 3 For Each cellule In Colonne2 Set Trouve = Colonne1.Find(cellule.Value, LookIn:=xlValues, lookat:=xlWhole) If Trouve Is Nothing Then cellule.Offset(0, 1).Value = cellule Next End Sub
Cdlt