petit probleme

Salut,
Si j'ai bien compris !

En D1 tu met la formule suivante que tu peu tirer vers le bas.

=SI(A1="10";A1;"")

Tu peu remplacer la valeur 10 pau une autre

@+
@pias

Salut Olivier, le Forum

Donc juste après Lien supprimé (entre amis) voici "petit problème" (entre amis)...

Attention que celà ne devienne pas le petit meurtre !!! Et je conseille avant tout de voir et lire la Charte de notre Forum.

Essayez, les gars, de faire des sujets clairs, sinon votre fil partira dans les oubliettes...

Une solution par macro, mais je pense qu'on doitr aussi pouvoir le faire par formule...

Sub Report()
Dim Cell As Range
Dim Indice As Long
Dim RetourInfo As String

Indice = InputBox("Entrez votre indice", "Cumul de l'Indice", 10)

For Each Cell In Range("B1:B" & Range("B65536").End(xlUp).Row)
If Cell.Value = Indice Then RetourInfo = RetourInfo & Cell.Offset(0, -1) & ";"
Next

Range("D1") = Left(RetourInfo, Len(RetourInfo) - 1)
End Sub

(Le Left(String, Len(string)- 1) c'est pour éviter le dernier ";" en fin de string, si pas nécessaire...mettre simplement = RetourInfo)

Bon Appétit
@+Thierry

Re: Retour des d'indices en fonction de leur Valeur respective sur un tableau

Salut Pias, Re Olivier

Heuh oui pia, moi j'avais compris qu'en "D1" Olivier voulait "1;3;6;7" mais pas la valeur 10 dans chaque cellule adjacente de la valeur 10... Enfin on verra bien...

Bon Appétit en tout cas
@+Thierry

Bonjour,

Avec formules.
Il y a la même chose dans "Autres Formules III", ici :
<http://www.excel-downloads.com/html/French/fichiers/programmation-date_maj-1.htm>
mais, dans le fichier joint, la formule est plus détaillée.