U
utilsfr
Guest
Bonjour
Voir pièce jointe pour mon problème
Cordialement
ROBERT René
Voir pièce jointe pour mon problème
Cordialement
ROBERT René
A
Arnaud
Guest
salut,
comme présisé dans la charte http://www.excel-downloads.com/html/French/CharteXLD.php
le mieux si tu souhaite avoir rapidement une réponse c'est de poser une question clair et non de juste joindre un fichier car tout le monde ne peut forcement pas télécharger le fichier mais également car ton problème peutse présenter a une autre personne et ton message ne figurera pas si l'on fais une recherche sur ce problème.
ps : désolé de ne pas te donné de réponse mais j'y connais rien en formule ^^ ( moi c la vba et c tout
).
comme présisé dans la charte http://www.excel-downloads.com/html/French/CharteXLD.php
le mieux si tu souhaite avoir rapidement une réponse c'est de poser une question clair et non de juste joindre un fichier car tout le monde ne peut forcement pas télécharger le fichier mais également car ton problème peutse présenter a une autre personne et ton message ne figurera pas si l'on fais une recherche sur ce problème.
ps : désolé de ne pas te donné de réponse mais j'y connais rien en formule ^^ ( moi c la vba et c tout
).
T
Ti
Guest
d'autant plus utilisfr, que tu viens ici pour qu'on t'aide à faire des programmes que tu t'empresseras de vendre sur ton propre site
U
utilsfr
Guest
Quel superbe Accueil !!
Les cannoniers sont de sortis ?
Les cannoniers sont de sortis ?
@
@+Thierry
Guest
Et oui toute l'artillerie !!! lol
Non Robert, je pense qu'Arnaud a tout a fait raison de t'avoir mis le lien sur notre Charte, et étant donné que tu connais quand même assez bien ce Forum, tu sais très bien que mettre une pièce jointe et inscrire "Voir pièce jointe pour mon problème" signifie que l'intevenant ne fait pas trop d'effort pour s'expliquer et ça fait un peu du style "Finissez mon travail"...
Donc qui sème le vent ...
D'ailleurs tu as un exemple clair, si tu lis un tant soit peu mes interventions, pendant certaines heures, sur certaines stations, il m'est formellement interdit de télécharger quoique ce soit... Donc un fichier joint sans aucune explication sur le Post ne risque pas d'obtenir de réponse de ma part, et je ne pense pas être le seul...
Bon Courage
@+Thierry
Non Robert, je pense qu'Arnaud a tout a fait raison de t'avoir mis le lien sur notre Charte, et étant donné que tu connais quand même assez bien ce Forum, tu sais très bien que mettre une pièce jointe et inscrire "Voir pièce jointe pour mon problème" signifie que l'intevenant ne fait pas trop d'effort pour s'expliquer et ça fait un peu du style "Finissez mon travail"...
Donc qui sème le vent ...
D'ailleurs tu as un exemple clair, si tu lis un tant soit peu mes interventions, pendant certaines heures, sur certaines stations, il m'est formellement interdit de télécharger quoique ce soit... Donc un fichier joint sans aucune explication sur le Post ne risque pas d'obtenir de réponse de ma part, et je ne pense pas être le seul...
Bon Courage
@+Thierry
U
utilsfr
Guest
Bien chef, mais c'est surtout pour me taquiner car des pièces jointes vos mieux que de longs discours
Valeurs critère les 5 plus proches valeurs
14500 14577 14578
14578 14579
14579 14567
14567 14500
17895 14879
14879
15648 Résultat attendu
25648
Recherche fonction pour afficher les 5 premières valeurs les plus proche de du critère
Valeurs critère les 5 plus proches valeurs
14500 14577 14578
14578 14579
14579 14567
14567 14500
17895 14879
14879
15648 Résultat attendu
25648
Recherche fonction pour afficher les 5 premières valeurs les plus proche de du critère
L
LaurentTBT
Guest
Bonsoir à tous,
De mon coté, j'ai pu ouvrir le fichier joint, mais je n'ai pas de réponse complète…
En passant par des colonnes intermédiaire:
dans une première colonne, je mets :
la valeur absolue de la différence entre le critère et chaque valeur
Ensuite, les résultats attendus sont les 5 plus petites Valeurs obtenues
Or justement, excel, grâce à l'utilitaire d'analyse, contient une fonction "Petite.Valeur"
Ceci dit, je ne sais pas comment faire pour avoir le résultat d'un seul coup. Peut-être une formule matricielle dont à le secret Monique?
Enfin, il faudra, à coup d'index ou Equiv, ou autre, retrouver les valeurs initiales, et là non plus, je ne sais pas terminer!
Bonne chance.
De mon coté, j'ai pu ouvrir le fichier joint, mais je n'ai pas de réponse complète…
En passant par des colonnes intermédiaire:
dans une première colonne, je mets :
la valeur absolue de la différence entre le critère et chaque valeur
Ensuite, les résultats attendus sont les 5 plus petites Valeurs obtenues
Or justement, excel, grâce à l'utilitaire d'analyse, contient une fonction "Petite.Valeur"
Ceci dit, je ne sais pas comment faire pour avoir le résultat d'un seul coup. Peut-être une formule matricielle dont à le secret Monique?
Enfin, il faudra, à coup d'index ou Equiv, ou autre, retrouver les valeurs initiales, et là non plus, je ne sais pas terminer!
Bonne chance.
A
andré
Guest
Salut à vous tous,
Et dire qu'en cherchant cinq secondes j'aurais peut-être trouvé une petite solution toute simple à une question du niveau de l'école gardienne !
Mais à la lecture de ce qui précède, je transforme légèrement mon message de vendredi dernier :
Dire que j'ai une solution : 1 Euro
Dire que j'ai une solution simple : 2 Euros
Dire que ma solution passe par un certaine nombre de fonctions : 3 Euros
Dire quelles sont ces fonctions : 4 Euros
Dire comment il faut employer ces fonctions : 5 Euros.
Ândré.
Et dire qu'en cherchant cinq secondes j'aurais peut-être trouvé une petite solution toute simple à une question du niveau de l'école gardienne !
Mais à la lecture de ce qui précède, je transforme légèrement mon message de vendredi dernier :
Dire que j'ai une solution : 1 Euro
Dire que j'ai une solution simple : 2 Euros
Dire que ma solution passe par un certaine nombre de fonctions : 3 Euros
Dire quelles sont ces fonctions : 4 Euros
Dire comment il faut employer ces fonctions : 5 Euros.
Ândré.
@
@+Thierry
Guest
re Bonsoir Robert, Ti, Arnaud
Je ne suis pas spécialiste de Fonction et Formules, mais heureusement nous avons Super Monique !!!
Sinon je m'étais aventuré dans une routine un peu foireuse mais bon, si ça peut servir, mais je ne pense pas vu que Monique a sûrement fait un truc bien plus fiable par formule, m'emfin maintenant que c'est fait :
Sub Seek5Val()
Dim ValSeek As Double
Dim Plage As Variant
Dim Tablo() As Double
Dim y As Integer
Dim I As Integer
Plage = Range("A1:A100")
ValSeek = ActiveCell
For y = 1 To 500 'NB valeur d'écart entre critère et valeurs (plus c'est grand plus c'est long !! lol)
If X = 5 Then Exit For
For I = 1 To UBound(Plage)
If Plage(I, 1) = ValSeek Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
ElseIf Plage(I, 1) = ValSeek + y Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
ElseIf Plage(I, 1) = ValSeek - y Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
End If
Next I
Next y
For I = 0 To UBound(Tablo, 2)
Cells(I + 1, 5) = Tablo(0, I)
Next
End Sub
Bonne Soirée
@+Thierry
Je ne suis pas spécialiste de Fonction et Formules, mais heureusement nous avons Super Monique !!!
Sinon je m'étais aventuré dans une routine un peu foireuse mais bon, si ça peut servir, mais je ne pense pas vu que Monique a sûrement fait un truc bien plus fiable par formule, m'emfin maintenant que c'est fait :
Sub Seek5Val()
Dim ValSeek As Double
Dim Plage As Variant
Dim Tablo() As Double
Dim y As Integer
Dim I As Integer
Plage = Range("A1:A100")
ValSeek = ActiveCell
For y = 1 To 500 'NB valeur d'écart entre critère et valeurs (plus c'est grand plus c'est long !! lol)
If X = 5 Then Exit For
For I = 1 To UBound(Plage)
If Plage(I, 1) = ValSeek Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
ElseIf Plage(I, 1) = ValSeek + y Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
ElseIf Plage(I, 1) = ValSeek - y Then
ReDim Preserve Tablo(1, X)
Tablo(0, X) = Plage(I, 1)
X = X + 1
End If
Next I
Next y
For I = 0 To UBound(Tablo, 2)
Cells(I + 1, 5) = Tablo(0, I)
Next
End Sub
Bonne Soirée
@+Thierry
M
Monique
Guest
Bonjour,
Avec la fonction ABS(), en effet,
avec ou sans colonne intermédiaire, au choix.
Celle-ci, en matriciel, en saisissant 5 cellules à la fois :
PETITE.VALEUR(SI(ABS(valeurs-critère)<PETITE.VALEUR(ABS(valeurs-critère);6);valeurs);{1;2;3;4;5})
Avec la fonction ABS(), en effet,
avec ou sans colonne intermédiaire, au choix.
Celle-ci, en matriciel, en saisissant 5 cellules à la fois :
PETITE.VALEUR(SI(ABS(valeurs-critère)<PETITE.VALEUR(ABS(valeurs-critère);6);valeurs);{1;2;3;4;5})
L
LaurentTBT
Guest
Bonsoir à tous, et un gros bisou à Monique…
Dis donc, Monique, tu as un système d'alerte sur ton PC? Dès que je te sonne, tu rappliques!
Comme d'hab, j'ai le début d'un soupçon de solution, je t'appelle au secours, et voilà, le travail est fait!
Un jour, peut-être, dans une autre vie, j'y arriverai tout seul… Enfin, c'est pas encore pour demain.
Ciao.
Dis donc, Monique, tu as un système d'alerte sur ton PC? Dès que je te sonne, tu rappliques!
Comme d'hab, j'ai le début d'un soupçon de solution, je t'appelle au secours, et voilà, le travail est fait!
Un jour, peut-être, dans une autre vie, j'y arriverai tout seul… Enfin, c'est pas encore pour demain.
Ciao.
@
@+Thierry
Guest
Dire que Ândré est en vacances !!!! ça n'a pas de prix !!!
Enfin même si ce fil était un peu partui de traviolle !!! je suis MDR !!!
Bravo à Monique !!!
Bravo aussi à Laurent !
Mais surtout merci à Ândré qui m'a permis de placer une pas possible !!! lol
@+Thierry (mdr çà fait longtemps que j'ai pas éclaboussé mon écran en délirant sur XLD !!!)
Enfin même si ce fil était un peu partui de traviolle !!! je suis MDR !!!
Bravo à Monique !!!
Bravo aussi à Laurent !
Mais surtout merci à Ândré qui m'a permis de placer une pas possible !!! lol
@+Thierry (mdr çà fait longtemps que j'ai pas éclaboussé mon écran en délirant sur XLD !!!)
@
@+Thierry
Guest
LOL LOL je suis encore plus MDR en voyant le résultat !!
Non non René je l'ai pas fait exprès c'était spontané !!!
@+Thierry
Non non René je l'ai pas fait exprès c'était spontané !!!
@+Thierry
