Variable ligne au complet

Re : Variable ligne au complet

Salut themjeh

Je ne sais pas si cela correspondera à ton souhait :

Sub verif_redondance()
Dim m_cell_f1 As Range
Dim m_cell_f2 As Range
Dim plage_f1 As Range
Dim plage_f2 As Range
Dim cont_cel_f1 As Variant
Dim cont_cell_f2 As Variant

Dim nm_f1 As Worksheet
Dim nm_f2 As Worksheet

Sheets("Feuil1").Select
Set nm_f1 = ActiveSheet
Sheets("Feuil2").Select
Set nm_f2 = ActiveSheet

nm_f1.Select
Set plage_f1 = Range("A1", Range("A65536").End(xlUp))
nm_f2.Select
Set plage_f2 = Range("A1", Range("A65536").End(xlUp))
For Each m_cell_f1 In plage_f1
nm_f2.Select
For Each m_cell_f2 In plage_f2
If m_cell_f1 = m_cell_f2 Then
m_cell_f2.EntireRow.Select
Selection.Delete shift:=xlUp
Exit For
End If
Next m_cell_f2
Set plage_f2 = Range("A1", Range("A65536").End(xlUp))
Next m_cell_f1
End Sub

A+

Re : Variable ligne au complet

Merci beaucoup

Je suis juste venu manger je retourne au travail
J'Y ai jetté un coup d'oeuil et le principe a l'air bien

C'est bon j'y ai aussi pris des idées ici:

https://www.excel-downloads.com/threads/supprimer-ligne-en-fonction.63264/

A+
Temjeh