Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Pierre Fauconnier
Bonsoir,
Sans VBA, je doute que ce soit possible sans se farcir une énumération des cellules lourde et fastidieuse, car je ne vois que =(Si(A1="12";A1 & " ";"")&SI(A2="12";A2 & " ";"")&SI(A3="12";"A3";"") pour une plage A1:B3 ... :-(( BreizhBird wrote:
Bonjour,
J'ai le tableau (par exemple) :
12 Alain 13 Bernard 14 Toto 12 Ernest 25 Julie 12 Nathalie, etc.
Quelle pourrait être la formule (sans VBA) pour sortir dans une seule cellule toutes les personnes ayany un résultat "12" ?
Merci d'avance
BreizhBird
Bonsoir,
Sans VBA, je doute que ce soit possible sans se farcir une énumération des
cellules lourde et fastidieuse, car je ne vois que
=(Si(A1="12";A1 & " ";"")&SI(A2="12";A2 & " ";"")&SI(A3="12";"A3";"")
pour une plage A1:B3 ... :-((
BreizhBird wrote:
Bonjour,
J'ai le tableau (par exemple) :
12 Alain
13 Bernard
14 Toto
12 Ernest
25 Julie
12 Nathalie, etc.
Quelle pourrait être la formule (sans VBA) pour sortir dans une seule
cellule toutes les personnes ayany un résultat "12" ?
Sans VBA, je doute que ce soit possible sans se farcir une énumération des cellules lourde et fastidieuse, car je ne vois que =(Si(A1="12";A1 & " ";"")&SI(A2="12";A2 & " ";"")&SI(A3="12";"A3";"") pour une plage A1:B3 ... :-(( BreizhBird wrote:
Bonjour,
J'ai le tableau (par exemple) :
12 Alain 13 Bernard 14 Toto 12 Ernest 25 Julie 12 Nathalie, etc.
Quelle pourrait être la formule (sans VBA) pour sortir dans une seule cellule toutes les personnes ayany un résultat "12" ?
Merci d'avance
BreizhBird
AV
Si des fois tu changes d'avis par rapport au vba (fonction perso) :
Function zzz(ValCherchée, LaPlage As Range) For Each C In LaPlage If C.Value = ValCherchée Then x = x & "-" & C.Offset(0, 1) Next If x = "" Then zzz = "#ERR!" Else zzz = Right(x, Len(x) - 1) End Function
AV
Si des fois tu changes d'avis par rapport au vba (fonction perso) :
Function zzz(ValCherchée, LaPlage As Range)
For Each C In LaPlage
If C.Value = ValCherchée Then x = x & "-" & C.Offset(0, 1)
Next
If x = "" Then zzz = "#ERR!" Else zzz = Right(x, Len(x) - 1)
End Function
Si des fois tu changes d'avis par rapport au vba (fonction perso) :
Function zzz(ValCherchée, LaPlage As Range) For Each C In LaPlage If C.Value = ValCherchée Then x = x & "-" & C.Offset(0, 1) Next If x = "" Then zzz = "#ERR!" Else zzz = Right(x, Len(x) - 1) End Function
