Vous utilisez un navigateur obsolète. Il se peut que ce site ou d'autres sites Web ne s'affichent pas correctement. Vous devez le mettre à jour ou utiliser un navigateur alternatif.
Tu as dit : "Comment transposer la formule à d'autres situations sans toto et à d'autres positions que A1?". C'est ce que j'ai fait. Je ne comprends pas :
"sans reprendre les données des cellules propagées"
Peux-tu donner un exemple ?
Daniel
Bonjour riton00, Effectivement, c'est plus simple. Ou encore, sauf erreur :
=JOINDRE.TEXTE(CAR(10);VRAI;FILTRE((E2:I2)&"J - "&$E$1:$I$1;E2:I2>0;""))
Daniel
Bonjour,
Pour la colonne B, essaie, en B2 à recopier vers lke bas :
=LET(tbl;MAP($E$1:$I$1;E2:I2;LAMBDA(p;j;SI(j>0;j&"J - "&p;"")));JOINDRE.TEXTE(CAR(10);1;tbl))
Mets les cellules de la colonne B au format "renvoyer à ligne automatiquement"
Daniel
Bonjour,
Essaie :
en C17 : =MIN(SOMME(C7;C10;C13);50)
en D17 : =SI(SOMME(C7;C10;C13)>50;MIN(SOMME(C7;C10;C13)-50;49);0)
en E17 : =SI(SOMME(C7;C10;C13)>99;SOMME(C7;C10;C13)-99;0)
Daniel
Bonjour,
Etonnant, ma macro suivante met 4/1000 seconde à s'exécuter :
Private Sub ComboBox1_Change()
deb = Timer
Me.ComboBox1.List = Application.Transpose(Evaluate("SORT(UNIQUE(A2:A11))"))
Debug.Print Timer - deb
End Sub
Daniel
Bonjour,
Tu peux récupérer les valeurs dans un tableau :
liste = Application.Transpose(Evaluate("SORT(UNIQUE(A1:A6))"))
et ensuite alimenter ta combobox.
Daniel