commant augmenter le nombre d'arguments

Question

Bonjour, (urgent !!!!)

voici ma formule : 
=SI(D7="a";2;SI(D7="b";2;SI(D7="c";2;SI(D7="d";2;SI(D7="e";2;SI(D7="f";2;SI(D7="g";2;SI(D7="h";2;SI(D7="i";2;SI(D7="j";2;SI(D7="k";2;SI(D7="l";2;SI(D7="ré";2;SI(D7="a1";3,5;SI(D7="a2";3,5;SI(D7="a3";3,5;SI(D7="a4";3,5;SI(D7="b1";3,5;SI(D7="b2";3,5;SI(D7="n1";4,5;SI(D7="n2";4,5;SI(D7="for";2,5;SI(D7="GT4";5,5;SI(D7="GT5";3;SI(D7="GT6";5;SI(D7="GT1";2;SI(D7="GT2";3,5;SI(D7="GT3";4,5;SI(D7="AR2";2;SI(D7="AR4";4,5;SI(D7="AR5";5;SI(D7="g1";0,55;SI(D7="g2";1,5;SI(D7="G3";1,5;SI(D7="G4";2;SI(D7="G5";2,5;SI(D7="G6";3;SI(D7="G7";4,5;SI(D7="G8";5;;SI(C7="AR5";5;SI(C7="g1";0,55;SI(C7="g2";1,5;SI(C7="G3";1,5;SI(C7="G4";2;SI(C7="G5";2,5;SI(C7="G6";3;SI(C7="G7";4,5;SI(C7="G8";5;SI(C7="g9";2;SI(C7="g10";4,5;SI(D7="g11";2;SI(D7="g12";4,5;SI(D7="g13";5;SI(D7="ré1";1,5;SI(D7="VM";1;0)))))))))))))))))))))))))))))))))))))))))))


mais ca me repond qu'il y a trop d'argument, il n'en faut que 64 et je les dépasse.

il faut absoluement que j'arrive à mettre toutes mes conditions, alors comment puis je parametrer excel pour qu'il accepte plus de 64 éléments ?  

merci beaucoup aux Zorro du web !!!!

bizu53 · Answer

Utilise des "calculs" intermédiaires dans d'autres cases, que tu masques éventuellement

bizu53 · Answer

Tu peux peut-être te passer de calculs intermédiaire...
Je n'avais pas fait attention que beaucoup de tes conditions donnent le même résultat
par exemple a b c d e f g h i j k et l donne 2
donc utilise un OU()
SI(OU(D7="a";D7="b";D7="c";D7="d";D7="e";D7="f";D7="g";D7="h";D7="i";D7="j");2;SI(...))

Lupin.A · Answer

Bonjour,

Il est aussi possible de fabriquer un fonction personalisé en VBA
qui utlise un [ Select Case (Cible) ]

Exemple :

1.) Installer cette fonction dans un module standard

Function ChercheValeur(ByVal Cible As Range) As Double

    Application.Volatile
    ChercheValeur = 0
    Select Case (Cible.Offset(0, 1).Value)
        Case "g1": ChercheValeur = 0.55
        Case "VM": ChercheValeur = 1
        Case "g2", "G3", "rél": ChercheValeur = 1.5
        Case "a", "b", "c", "d", "e", "f", "g", _
             "h", "i", "j", "k", "l", "ré", "GT1", _
             "AR2", "G4", "g11": ChercheValeur = 2
        Case "for", "G5": ChercheValeur = 2.5
        Case "GT5", "G6": ChercheValeur = 3
        Case "a1", "a2", "a3", "a4", "b1", "b2", "GT2": ChercheValeur = 3.5
        Case "n1", "n2": ChercheValeur = 4
        Case "GT3", "AR4", "G7", "g12": ChercheValeur = 4.5
        Case "GT6", "AR5", "G8", "g13": ChercheValeur = 5
        Case "GT4": ChercheValeur = 5.5
    End Select

    Select Case (Cible.Value)
        Case "g1": ChercheValeur = 0.55
        Case "g2", "G3": ChercheValeur = 1.5
        Case "G4", "g9": ChercheValeur = 2
        Case "G5": ChercheValeur = 2.5
        Case "G6": ChercheValeur = 3
        Case "G7", "g10": ChercheValeur = 4.5
        Case "AR5", "G8": ChercheValeur = 5
    End Select

End Function
'


2.) En A1 faire appel au menu des fonctions, choisir type Personnalisé

3.) Sélectionner ChercheValeur

4.) Pointer la cellule C7

5.) La cellule A1 prendra la valeur en fonction des écrits dans C7 et/ou D7

Lupin

Commant augmenter le nombre d'arguments

3 réponses

Discussions similaires

Newsletters