Décaler ligne d'un tableau en fonction d'une liste déroulante

Bonjour,

J'ai un planning de base dans l'onglet Planning de B5 à H13.

Dans l'onglet Janvier en C8 j'ai une liste déroulante qui indique IDE.

J'aimerais que si je choisis IDE 1 que ca me prenne le tableau de base par contre si je prends IDE 2 il faudrait que je décale d'une ligne.

que ca soit ma deuxième ligne et que la dernière ligne soit la première.

et pour IDE on consomme par la ligne 3 et que ça reprenne pour ligne 8 et 9 la première ligne et la deuxième ligne etc.

au cas ou j'ai fais les tableau de chaque IDE dans l'onglet trame.

Il faudrait que ce tableau apparaisse sur un onglet sans préférence.

donc ce tableau a 9 lignes et ce qui correspond à mon numéro de semaine.

donc ligne 1 = semaine 1 etc

dans mon onglet Janvier en ligne 7 j'ai une formule me donnant le numéro de semaine de la date

donc j'aimerais que si c’est la 8 semaine que et un lundi que j'ai la ligne 8 et la premier colonne pour le lundi.

Il faudrait que je puisse voir tout le planning du mois par rapport à L'IDE et le numéro de semaine de la date.

Merci pour votre aide.

En espérant être assez clair.

Nicolas

Salut Nico,

si j'ai bien compris et sachant que ce code n'est valable que pour la feuille-exemple 'Janvier' de ce fichier.
La macro démarre sur un changement de valeur en 'Janvier' [C8].

            With Sh
                iRow = (Split(Target, " ")(1) + .Range("F7").Value - 1) Mod 9
                .Range("F8").Resize(1, 31).Clear
                iCol = Weekday(.Range("F5").Value, vbMonday)
                For y = 6 To 5 + DateDiff("d", .Range("F5").Value, DateAdd("m", 1, .Range("F5").Value))
                    .Cells(8, y) = [PLANNING].Cells(iRow, iCol)
                    .Cells(8, y).Interior.Color = [PLANNING].Cells(iRow, iCol).DisplayFormat.Interior.Color
                    iCol = IIf(iCol + 1 = 8, 1, iCol + 1)
                    iRow = IIf(iCol = 1, IIf(iRow + 1 = 10, 1, iRow + 1), iRow)
                Next
            End With

A+