Bonjour le forum,
Sur le code suivant mon incrémentation se fait vert le haut... J'aimerais que cela se fasse vers le bas, de plus j'aimerais y introduire une formule pour chaque nouvelle ligne ->
=SI(ESTERREUR(RECHERCHEV(B4;Entrées!$C$3:$F$2000;4;0));"";RECHERCHEV(B4;Entrées!$C$3:$F$2000;4;0))
Le code à changer pour une incrémentation vers le bas que j'ai mis :
Sub Trier_Sorties()
Sheets("Sorties").Activate
Call Déprotéger
With Sheets("Sorties").Range("Sorties")
.Sort Key1:=ActiveCell, Order1:=xlAscending, Header:= _
xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortTextAsNumbers
End With
Call Protéger
End Sub
Merci de votre aide !
Bonne journée, Romain.