XL 2016 affichage cellules selon conditions et d'affilée

[cyrilv77]

Bonjour,
Dans un fichier j'ai un onglet nommé base qui en lignes a plusieurs noms de stagiaires, qui sont disponibles sur différents stages nommés de 1 à 30 (colonnes).
Dans un onglet résultat attendu, je souhaite avoir en lignes mes numéros de stage, et que dans les colonnes s'affichent au fur et à mesure dans les cellules les noms de ceux qui sont disponibles sur les stages en questions,
Vous trouverez en PJ un fichier avec l'onglet base et le résultat attendu.
Je ne sais pas vraiment quelle fonction utilisée, ni comment l'écrire.
Merci de votre aide.
Cyril

 

[sylvanu]

Bonsoir Cytil,
Un essai en PJ avec une macro évènementielle qui se déclenche automatiquement lorsqu'on sélectionne la feuille "résultat attendu" avec :

Sub Worksheet_Activate()
    Dim Fbasen, L%, Col%, Col2%, Lig%
    Application.ScreenUpdating = False
    [D3:M30].ClearContents
    Set Fbase = Sheets("Base")
    For L = 1 To 30 ' N° stage
        Col = L + 3
        Col2 = 4
        Lig = 4
        While Fbase.Cells(Lig, "C") <> ""
            If Fbase.Cells(Lig, Col) = "x" Then
                Cells(L + 2, Col2) = Fbase.Cells(Lig, "C")
                Col2 = Col2 + 1
            End If
            Lig = Lig + 1
        Wend
    Next L
    Application.ScreenUpdating = True
End Sub

 

[cyrilv77]

Bonsoir Sylvanu.
Merci beaucoup à vous, c'est exactement mon besoin.
Je vous une très bonne soirée,
A bientôt sur le forum.
Cyril

 

[cyrilv77]

je vous souhaite, pardon