Formule pour trouver des colonnes.

[JJ1]

Bonjour,

Je joins un exemple de ma recherche, un tableau contenant des "1".
Jusqu'ici, tout va bien !
Le but de la formule (ou de la macro? ) serait de trouver (comment ? ) puis d'inscrire à partir de N4 le minimum de colonnes (ici trois) permettant d'avoir un "1" sur chaque ligne.
Un contrôle est fait au dessous du résultat.
Je ne vois pas la fonction à utiliser, sachant que mon tableau réel est bien plus grand!
Merci de votre aide.
Bonne journée à tous.

 

[hoerwind]

Re : Formule pour trouver des colonnes.

Bonjour,

Essaie ceci en N5 :

=SI(DECALER($E$1;LIGNES($1:1);EQUIV(N$4;$F$1:$K$1;0));LIGNE()-3;"")

formule à copier vers le bas et vers la droite.

 

[CHALET53]

Re : Formule pour trouver des colonnes.

Bonjour,
J'ai plutôt compris que les valeurs en N4 et suivantes sont celles que veut trouver JJ1
Un essai en vba à adapter (rajout de deux colonnes : Somme et CTRL)

a+

 

[JJ1]

Re : Formule pour trouver des colonnes.

Bonjour Hoerwind, Chalet53,
Merci pour votre aide, effectivement je souhaite à la fois les numéros de colonnes nécessaires et le contrôle en dessous.
J'ai lancé la macro jointe, les 4 colonnes jaunes s'affichent mais pas le contrôle, j'ai du faire une erreur quelque part?
Merci
Je joins le fichier test.
Bon vendredi.

 

[Bebere]

Re : Formule pour trouver des colonnes.

bonjour JJ1,Hoerwind,Chalet
si bien compris

Sub essai()
Dim DerL As Long, C As Integer, J As Integer

Range("O4:U5").ClearContents
DerL = Cells.Find("*", [A1], , , 1, 2).Row
C = 15
For i = 2 To DerL
If Application.CountIf(Range("F" & i & ":K" & i), "=" & 1) = 1 Then
J = Range("F" & i & ":K" & i).Find(1, LookIn:=xlValues).Column
Cells(4, C).Value = Cells(1, J).Value
Cells(5, C).Value = J
C = C + 1
End If
Next

End Sub

à bientôt

 

[CHALET53]

Re : Formule pour trouver des colonnes.

Bonjour à tous,

Comme j'avais complété, je joins le fichier
JJ triera

 

[JJ1]

Re : Formule pour trouver des colonnes.

Re,
J'ai gardé la 1ère macro de 10H et ajouté la formule d'Hoerwind pour le contrôle des nombres (tout ok) car la 2ème macro jointe efface chaque colonne de nombres à chaque click?
Par contre, j'ai testé aussi la macro de Bébère (merci) mais je n'ai pas compris ce qu'elle réalisait?(les contrôles sont sur une seule ligne)
Merci à vous.
Bonne soirée