XL 2013 Vérifier si une plage est en ordre croissant

[Matt51140]

Bonjour le forum,

Afin de vérifier si 7 valeurs d'une colonne sont en ordre croisant ou décroissant j'utilise ceci :

=SI(OU(ET($D33>$D32;$D34>$D33;$D35>$D34;$D36>$D35;$D37>$D36;$D38>$D37);(ET($D33<$D32;$D34<$D33;$D35<$D34;$D36<$D35;$D37<$D36;$D38<$D37)));VRAI;FAUX)

Cette formule est ensuite tirée sur des centaines de lignes.

Existe-t-il à votre connaissance quelque chose de plus simple, sans avoir à passer par des colonnes intermédiaires.

Merci d'avance.

Matthieu.

 

[Victor21]

Bonjour.

Sans fichier exemple...
A tout hasard :

=D1>D2

propagé sur la zone renvoie VRAI ou FAUX qu'il est ensuite facile de filtrer

 

[job75]

Bonjour Matt51140, Patrick,

Formule matricielle, à valider par Ctrl+Maj+Entrée :

=OU(ET(D33:D38>D32:D37);ET(D33:D38<D32:D37))

A+

 

[mapomme]

Bonjour @Matt51140, @Victor21 🙂, @job75 🙂

Une autre formule matricielle, à valider par Ctrl+Maj+Entrée :

=ET(SIGNE(D32:D37-D33:D38)=SIGNE(D32-D33))

nota: un cas où elle ne marche pas (mais je vous laisse chercher... 😉)

 

[Matt51140]

Bonjour à tous,

Désolé de ne pas être revenu vers vous plus rapidement. Je n'ai pas recu les notifs de vos réponses.

Merci pour vos réponses.

Je vais retenir la solution de Job75.

Matthieu.

 

[Matt51140]

Rebonjour,

mapomme, est ce que cela ne marche pas si les 7 valeurs sont identiques ? (renvoie VRAI)

Matthieu.

 

[mapomme]

Bonsoir @Matt51140 🙂

Bien vu! 😎

 

[job75]

Bonjour Matt51140, Patrick, mapomme,

Fonction VBA à placer impérativement dans un module standard :

Function CD(r As Range) As Boolean
Dim ordre As Boolean, i&
ordre = r(1) < r(2)
CD = True
For i = 1 To r.Count - 1
    If r(i) < r(i + 1) <> ordre Or r(i) = r(i + 1) Then CD = False: Exit Function
Next
End Function

A+