Ecart de 2 chiffres de 2 colonnes en remontant vert le haut

Bonjour à tous.

Cette demande consiste à calculer d'après 2 colonnes de chiffres de 1 à 12 les pairs les plus loingtaines

en remontant d'une colonne exemple n°1200 vert le haut colonne n° 3

Je vous mais un exemple pour comprendre ma demande qui n'est pas simple à expliquée.

Merci d'avance de vos réponses à venir

PS: Je suis en Excel2003

Bonjour,

j'ai fait un TCD avec la source =plg

plage nommée : plg =Ecarts!$G$2:$J$1202

et j'ai utilisé la formule LIREDONNEESTABCROISDYNAMIQUE

à tester,

Bonjour, Isabelle ,

Sinon, avec une fonction perso :

Function ECART(Plage1 As Range, Plage2 As Range, Valeur1 As Integer, Valeur2 As Integer, Col As Integer) As Long

    Dim T1
    Dim T2
    Dim Lig As Long
    Dim I As Long
    Dim Max As Long

    If Plage1.Rows.Count = Rows.Count Then Lig = Plage1.Cells(Plage1.Rows.Count, 1).End(xlUp).Row Else Lig = Plage1.Rows.Count

    T1 = Plage1.Resize(Lig): T2 = Plage2.Resize(Lig)

    For I = 1 To UBound(T1)

        If T1(I, 1) = Valeur1 And T2(I, 1) = Valeur2 Or _
        T2(I, 1) = Valeur1 And T1(I, 1) = Valeur2 Then If Max < I Then Max = I

    Next I

    ECART = Worksheets(Plage1.Parent.Name).Cells(Max + Plage1(1, 1).Row - 1, Col).Value

End Function

A utiliser de cette façon :

=ECART(I:I;J:J;AB1196;AD1196;COLONNE(G1))

Les deux premiers arguments sont les plages indifféremment positionnées (I en 1er ou en second et de même pour J), troisième et quatrième arguments sont les éléments du couple cherché et le dernier, le numéro de colonne ou se trouve la valeur à retourner

Merci beaucoup de vous avoir penché sur cette demande

la premiere solution n'est pas adapté à mon programme trop complexe

Pour la deuxième réponse les macros ce n'est pas mon fort.

Désolé

Bonjour,

Pour la deuxième réponse les macros ce n'est pas mon fort.

Il faut parfois se jeter à l'eau

Tu appuis sur la touche Alt que tu maintiens enfoncée puis la touche F11 (là, tu viens d'ouvrir le VBE) ensuite la touche I en enfin la touche M, dans la zone de texte qui vient d'apparaître à droite, tu colles le code que je t'ai donné et tu refermes le VBE car tu n'auras plus besoin d'y revenir.

Dans Excel, comme n'importe quelle fonction, tu entres la formule "=ECART(I:I;J:J;AB1196;AD1196;COLONNE(G1))"

Bonjour à tous,

=MAX(0;LIGNE()-MIN(SI(((TEXTE($I$3:I11;"00")&TEXTE($J$3:J11;"00")=TEXTE(I12;"00")&TEXTE(J12;"00"))+(TEXTE($J$3:J11;"00")&TEXTE($I$3:I11;"00")=TEXTE(I12;"00")&TEXTE(J12;"00")));LIGNE($I$3:I11);9^9)))

formule matricielle à valider avec shift+ctrl+entrée

La formule doit s'entourer de { } si la validation est correcte.

Je me suis mis en haut du tableau et modifié qq valeurs que ce soit plus simple

eric

Suite à ma demande

Je remercie les intervenants d'avoir répondu rapidement

Mais voila je change ce mini programme, qui devrais être plus simple en formule

C'est toujours pour le même résultat

Je joint 2 programmes un ancien que j'avait utilisé pour un classement de chiffres

qui en le modifiant pourait peut être résoudre ma demande

et le nouveau dont j'ai modifier quelques colonnes

Merci pour vos réponses prochaines