Synthése d'un classeur en fonction d'un critére présent plusieurs fois.

  • Initiateur de la discussion Initiateur de la discussion ESCMatt
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

E

ESCMatt

Guest
Bonjour à tous!


Voilà quelques heures que je me penche sur un sujet sans vraiment trouver de réponses sur les forums ...

Je vous présente donc mon problèmes, je remet un apéro en jeux pour celui ou celle qui va réussir à m'aider (je suis toujours très sérieux bien entendu).


Alors voilà, (je vous joint un fichier expliquant la chose).

J'ai deux feuilles, une pour synthétiser l'autre.

Dans la feuille synthèse, je veux aller chercher seulement trois cellules d'une ligne de la feuille data. Je veux que ma fonction aille sélectionner ces cellules en fonction de la colonne "Note". Cependant il y a plusieurs lignes qui on la même note, la fonction si ne me donne qu'une seule ligne alors qu'il y en a parfois plus ...



J'espère avoir été synthétique dans mon explication.



Merci d'avance pour vos réponses !



Cheers !

(Je suis sur Paris Et Le Mans pour l'apéro 😉 )
 

Pièces jointes

Re : Synthése d'un classeur en fonction d'un critére présent plusieurs fois.

Bonjour Matt.

Je ne gagnerai pas l'apéro, je te réponds en VBA. En attendant qu'un expert en formules te file un coup de pouce.

Code:
Sub Synthese()
Dim t, i&, l&
With Sheets("Data")
    t = .Range("a2:d" & .[a65000].End(xlUp).Row)
End With
With Sheets("Synthése")
    l = .[a65000].End(xlUp).Row + 1
    For i = LBound(t) To UBound(t)
        If t(i, 4) > 30 Then .Cells(l, 1).Resize(, 4).Value = Application.Index(t, i, Array(1, 2, 3, 4)): l = l + 1
    Next i
End With
End Sub
 
Re : Synthése d'un classeur en fonction d'un critére présent plusieurs fois.

Merci pour t'as réponse !

J'avais aussi fait un code mais le problèmes et que pas mal de gens ne comprennent pas le VBA et donc pourrons pas adapter le code ...

Bonne journée à toi 😉
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

B
Réponses
10
Affichages
1 K
Brahim077
B
B
Réponses
2
Affichages
1 K
Bidule77
B
R
Réponses
2
Affichages
823
runshaft
R
M
Réponses
3
Affichages
1 K
M
A
Réponses
2
Affichages
854
AlenkaSch
A
A
Réponses
7
Affichages
2 K
Arkana54
A
H
Réponses
8
Affichages
2 K
Julien2949
J
B
Réponses
6
Affichages
1 K
blankovitch
B
J
Réponses
4
Affichages
1 K
jesustherockstar
J
Retour