bonjour
bonjour dan ; je crois que c'est une histoire de doublons
si en vba j'ai trouvé ce code
Ce programme efface les doublons dans la colonne sans supprimer les lignes.
Sub EffaceDoublonsColonnnes()
Const Cell_Départ As String = "A1"
Dim Fin As Range, I As Long, J As Long, Col As Integer
Dim ModeCalcul As Long
With Application
ModeCalcul = .Calculation
.Calculation = xlCalculationManual
.ScreenUpdating = False
End With
Col = Range(Cell_Départ).Column
Set Fin = Range(Cell_Départ).End(xlDown)(2)
On Error Resume Next
Do
I = J + 1
J = Range(Cells(I, 1), Fin).ColumnDifferences(Cells(I, 1))(0).Row
If J > I Then Range(Cells(I + 1, 1), Cells(J, 1)).ClearContents
Loop Until Err
Application.Calculation = ModeCalcul
End Sub
cordialement