Sélectionner la valeur la plus proche de 1

[anthony_unac]

Bonjour,

Comment fait on pour sélectionner la valeur la plus proche de 1 dans une plage donnée.

Exemple avec la plage A1:F1 :
**********************
A1=0.75 B1=0.36 C1=0.79 D1=0.87 E1=0.97 F1=0.31

Le but ici est de sélectionner la cellule E1 car elle est la plus proche de 1.

Cordialement
Anthony

 

[Habitude]

Re : Sélectionner la valeur la plus proche de 1

En supposant que tout tes nombres sont inférieurs à 1

=Max(A1:F1)

 

[tototiti2008]

Re : Sélectionner la valeur la plus proche de 1

Bonjour Anthony, Bonjour Habitude,

sinon, un autre essai

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

Merci beaucoup les gars 😉
C'est dingue à chaque fois j'ai l'impression que vous trouvez la fonction qui va bien en deux deux.

Un grand merci !

Cordialement
Anthony

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

Oups j'ai répondu trop vite car il y a effectivement des valeurs supérieurs à 1.
Que faire dans ce cas ?

Recourir à une imbrication de SI du style :
********************************
En admettant une plage de trois valeurs rangée dans l'ordre croissant

SI(A1<1;SI(B1<1;SI(C1<1;MAX(A1:C1);MAX(A1:B1));A1);A1)

Cordialement
Anthony

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

Bonjour Anthony, Bonjour Habitude,

sinon, un autre essai

Il fonctionne très bien votre fichier mais dès que j'essaie d'incorporer votre formule dans le mien ça foire 😕
Ci joint vous verrez ma tentative en cellule L15 (valeur de delta)

Cordialement
Anthony

 

[Tibo]

Re : Sélectionner la valeur la plus proche de 1

Bonjour anthony,

une formule matricielle apparaît avec des accolades dans la barre de formule.

Mais il ne faut pas les saisir (les accolades)

Elles apparaissent après qu'on ait validé la formule par la combinaison de touches : CTRL + MAJ + ENTREE

J'ai tenté d'adapter quelque peu ton fichier, notamment pour éviter l'affichage des messages #VALEUR

Je te laisse regarder

@+

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

Bonjour anthony,

une formule matricielle apparaît avec des accolades dans la barre de formule.

Mais il ne faut pas les saisir (les accolades)

Elles apparaissent après qu'on ait validé la formule par la combinaison de touches : CTRL + MAJ + ENTREE

J'ai tenté d'adapter quelque peu ton fichier, notamment pour éviter l'affichage des messages #VALEUR

Je te laisse regarder

@+

Merci pour ce fichier !
J'ai remanié un peu la ligne des cumuls (cf fichier joint) par contre la cellule L15 (valeur de delta) ne fonctionne plus 🙁

Pourquoi ca ?

Cordialement
Anthony

 

[Tibo]

Re : Sélectionner la valeur la plus proche de 1

re,

en L15, adapter la formule ainsi (pour tenir compte des cellules contenant une chaîne vide) :

=INDEX(C13:V13;EQUIV(MIN(SI(ESTNUM(C13:V13);ABS(C13:V13-1)));SI(ESTNUM(C13:V13);
ABS(C13:V13-1));0))

Toujours matricielle, donc à valider par CTRL + MAJ + ENTREE

@+

 

[ROGER2327]

Re : Sélectionner la valeur la plus proche de 1

Re... (Bonsoir à tous)

Bonjour,

Comment fait on pour sélectionner la valeur la plus proche de 1 dans une plage donnée.

Exemple avec la plage A1:F1 :
**********************
A1=0.75 B1=0.36 C1=0.79 D1=0.87 E1=0.97 F1=0.31

Le but ici est de sélectionner la cellule E1 car elle est la plus proche de 1.

Cordialement
Anthony

Le code qui suit le fait :

[COLOR="DarkSlateGray"][B]Sub toto()
Dim oCel As Range, x#, p$
   x = 1.79769313486231E+308
   With Range("A1:F1")
      For Each oCel In .Cells
         x = WorksheetFunction.Min(x, Abs(oCel.Value - 1))
      Next oCel
      For Each oCel In .Cells
         If x = Abs(oCel.Value - 1) Then
            p = p & "," & oCel.Address
         End If
      Next oCel
   End With
   Range(Right$(p, Len(p) - 1)).Select
End Sub[/B][/COLOR]

ROGER2327
#3748

Dimanche 8 Gidouille 137 (Sainte Boudouille, bayadère, ST)
4 Messidor An CCXVIII
2010-W25-2T20:20:58Z

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

re,

en L15, adapter la formule ainsi (pour tenir compte des cellules contenant une chaîne vide) :

=INDEX(C13:V13;EQUIV(MIN(SI(ESTNUM(C13:V13);ABS(C13:V13-1)));SI(ESTNUM(C13:V13);
ABS(C13:V13-1));0))

Toujours matricielle, donc à valider par CTRL + MAJ + ENTREE

@+

J ai un peu honte mais je ne comprends pas cette histoire de validation par CTRL + MAJ + ENTREE pour moi une formule matricielle est valide en permanence 😕

Cordialement
Anthony

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

En plus le ctrl maj entree ne fonctionne guère chez moi (excel 2002)
Est ce normal ou alors c'est moi qui suis à coté de la plaque ?

Cordialement
Anthony

 

[Tibo]

Re : Sélectionner la valeur la plus proche de 1

re,

Une formule classique est validée par simple pression de la touche Entrée.

Pour les formules matricielles, la validation doit se faire comme indiqué :

CTRL (maintenu)
MAJ (maintenu)
puis
ENTREE

et on lâche tout

Quand à expliquer les formules matricielles, ben pas évident. Une technique pour commencer à comprendre leur fonctionnement consiste à sélectionner les différentes parties de la formule dans la barre de formule et à appuyer sur F9 (ne pas valider ensuite, mais faire ECHAP)

@+

Edit : Précision : les formules matricielles ne peuvent être validées dans des cellules fusionnées. Si la fusion est absolument nécessaire : défusionner, valider matriciellement, refusionner

@+

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

re,

Une formule classique est validée par simple pression de la touche Entrée.

Pour les formules matricielles, la validation doit se faire comme indiqué :

CTRL (maintenu)
MAJ (maintenu)
puis
ENTREE

et on lâche tout

Quand à expliquer les formules matricielles, ben pas évident. Une technique pour commencer à comprendre leur fonctionnement consiste à sélectionner les différentes parties de la formule dans la barre de formule et à appuyer sur F9 (ne pas valider ensuite, mais faire ECHAP)

@+

Edit : Précision : les formules matricielles ne peuvent être validées dans des cellules fusionnées. Si la fusion est absolument nécessaire : défusionner, valider matriciellement, refusionner

@+

Ok je pensais qu'une formule était (par défaut) une formule matricielle alors qu'en fait ce sont deux choses différentes.
Merci pour l'info 😉

Cordialement
Anthony

 

[anthony_unac]

Re : Sélectionner la valeur la plus proche de 1

re,

en L15, adapter la formule ainsi (pour tenir compte des cellules contenant une chaîne vide) :

=INDEX(C13:V13;EQUIV(MIN(SI(ESTNUM(C13:V13);ABS(C13:V13-1)));SI(ESTNUM(C13:V13);
ABS(C13:V13-1));0))

Toujours matricielle, donc à valider par CTRL + MAJ + ENTREE

@+

Malheureusement, cette formule ne fonctionne toujours pas correctement même en la validant dans les règles de l'art(cf fichier joint).

Je pense que c'est de ma faute car la formule renvoie bien la valeur la plus proche de 1 mais j'ai oublié de préciser qu'il faut que cette valeur soit inférieur à 1.

Autrement, il y a 2 conditions :
************************
1/ Être le plus proche de 1
2/ Être inférieur à 1

ou si vous préférez être le plus proche de 1 sans le dépasser.