Remplissage automatique d'un tableau

Question

Je dois compléter régulièrement le tableau ci-joint et c'est assez fastidieux. S'il y a 3 valeurs (A, B et C) dans les cellules C32 à C37, je dois les reporter manuellement dans le planning horaire : 1 lettre par case, avec un décalage d'une lettre toutes les 24 heures. S'il y a 6 valeurs (A, B, C, D, E et F) dans les cellules C32 à C37, la règle change : 2 lettres par case, avec un décalage d'une lettre pour chaque lettre de la case toutes les 24 heures (cf. tableau "2ème semaine" avec un exemple sur la série "D à I"). Est-il possible d'imaginer une formule qui permette de remplir le tableau automatiquement en utilisant les valeurs saisies manuellement dans les cellules C32 à C37 ? Dans l'idéal, il faudrait que la formule détecte s'il y a 3 ou 6 valeurs. Si 3 valeurs = une lettre par case. Si 6 valeurs = deux lettres par case. Quelqu'un pourrait-il m'aider ?? Merci par avance. David...

AMIR · Answer

Essayer ça pour la premeire partie : pour la 2 eme partie je ne comprends pas comment s incrémente les cases...

axion · Answer

Une contribution sans macro, mais facilement adaptable (2 formules à copier-coller "Formules" (ne pas étirer) Une pour la partie Jour, l'autre pour la partie Nuit et quelques explications Bonne suite Cordialement...

m3ellem1 · Answer

Slt, juste une idée que tu peux developper.....

AMIR · Answer

Hier J ai édité ces deux lignes sans que je test encore : Set Rng1 = Range("C4:I27").ClearContents Set Rng2 = Range("M4:T27").ClearContents Avant elles ont été comme ça : Set Rng1 = Range("C4:I27") Set Rng2 = Range("M4:T27") Rng1.ClearContents Rng2.ClearContents J ai voulu laisser seulement deux linges : Range("C4:I27").ClearContents Range("M4:T27").ClearContents Puis je supprime les variables déclarés inutiles pour la 2 eme partie : Merci m3ellem1, mais sincèrement je ne comprends pas bien comment s incrémente les cases de la 2eme semaine ,mais je vais ressayer alors pour la premiere partie voici le fichier a nouveau ...