Mise en forme conditionnelle

bonjour

j'ai appliquer une mise en forme conditionnelle (=$A3<>$A2) sur mon tableau1 pour distinguer les N° de pièce.

le probleme que mon tableau1 contient plus de 45000 ligne alors cette mise en forme ralentie beaucoup le travail dans ce fichier.

Svp comment garder cette distinction sans la mise en forme conditionnelle meme avec code vba

merci

Bonjour,

A titre de test pour une substitution ...

Sub TestLigne()
Application.ScreenUpdating = False
Application.Calculation = xlCalculationManual
Dim i As Long
Dim der As Long
der = ActiveSheet.Cells(Rows.Count, "A").End(xlUp).Row
    For i = 3 To der
       If Cells(i, 1) <> Cells(i - 1, 1) Then Range("A" & i & ":" & "F" & i).Borders(xlEdgeTop).LineStyle = xlContinuous
    Next i
Application.Calculation = xlCalculationAutomatic
Application.ScreenUpdating = True
End Sub

En espèrant que cela t'aide

bravo Mr James007

ça marche très bien

Content que cela puisse t'aider ...

Merci pour tes remerciements ...