XL pour MAC Remplissage créneaux planning à partir d'une liste de dates et horaires

chasacorder

XLDnaute Nouveau
Bonjour à tous,

Je suis une petite nouvelle et sur ce forum ainsi que sur excel ! Ravie de vous rencontrer !

Je cherche à réaliser un planning type calendrier à envoyer à mes enseignants.
Pour de la visibilité pour eux et de la praticité pour moi, j'aimerais que les cases se remplissent automatiquement avec le nom des groupes à partir d'une liste de dates et d'horaires de leurs interventions.

Pouvez-vous m'aider ?

Merci d'avance,
Bien à vous !
Cha
 

Pièces jointes

  • Calendrier Scolaire Anglais 2022-2023.xlsx
    81.4 KB · Affichages: 15

chasacorder

XLDnaute Nouveau
Bonjour François !

Tu es un ange, il ne fallait pas, ça j'y arrive encore toute seule... 🤪

Merci 🥰

Dis, si je voulais complexifier un peu les tableaux en ajoutant une matière dans les macros comme le fichier "exemple" joint... Est-ce que ca serait possible ou là... on commence à rentrer vraiment dans la complication extrême ?

Bien sur les matières varient selon les groupes, les dates et les heures...
 

Pièces jointes

  • Exemple.xlsx
    8.6 KB · Affichages: 3

fanfan38

XLDnaute Barbatruc
Bonjour
Pour l'instant je t'ai fait: la 1ere lettre de la matière suivi de la classe...
On peut faire la matière et à la ligne la classe...
Je ne sais pas ce que tu veux...

A+ François
 

Pièces jointes

  • Exemple planification 2022_2023.xlsm
    54.6 KB · Affichages: 3

chasacorder

XLDnaute Nouveau
Hello !
Bon ça risque d'être un peu fastidieux à lire... Je réfléchis à une solution.

Car j'ai des enseignants qui gèrent 5 matières, d'autres une seule...
Puis égoïstement, j'aurais voulu me sortir un calendrier pour avoir une vue d'ensemble par classe mais là c'est une matière une couleur...

Je réfléchis.
 

fanfan38

XLDnaute Barbatruc
Bonjour
Tout est dans la macro affiche
VB:
    Select Case .Range("A" & i).Value
      Case Is = "Histoire"
        coul = RGB(255, 252, 0)
      Case Is = "Français"
       coul = RGB(122, 129, 255)
      Case Is = "Mathématiques"
       coul = RGB(255, 147, 0)
      Case Is = "Anglais"
       coul = RGB(115, 251, 121)
      Case Else
       coul = RGB(230, 184, 183)
    End Select
    sh.Cells(lig, col).Value = .Range("B" & i).Value
    sh.Cells(lig, col).Interior.Color = coul
A+ François
 

chasacorder

XLDnaute Nouveau
Bonjour François, ça fait longtemps !

J'étais certaine de t'avoir remercié suite à ton dernier message... Toutes mes excuses, ça arrive tard : MERCI !

Je reviens pour avoir un peu d'aide supplémentaire niveau macro stp ;)

Le tableau m'a énormément servi en plus, et ce toute l'année !

J'aurais besoin d'une petite amélioration cette année et surtout savoir s'il est possible de fusionner les colonnes "date", "début" et "fin" de l'onglet événement pour n'avoir qu'une seule colonne "date et heure" qui respecterait ce format :

jeu. 19/10/2023 09h00

Est-ce que excel permet cela ? J'ai tenté des modifs dans la macro mais j'ai un message d'erreur...

Merci d'avance
Cha
 

Pièces jointes

  • Calendrier 2023_2024.xlsm
    62 KB · Affichages: 3

ChTi160

XLDnaute Barbatruc
Bonjour le Fil
Bonjour @+François
Normal car maintenant ce n'est plus une Date que tu as en Colonne "A"
donc :
VB:
Month(.Range("A" & i).Value)
Ne peut renvoyer un Mois car (jeu. 19/10/2023 09h00) n'est pas Une date , mais Un String (du texte) !
Bonne fin de Journée
Jean marie
 

Discussions similaires

Statistiques des forums

Discussions
312 113
Messages
2 085 422
Membres
102 886
dernier inscrit
eurlece