Calendrier Stagiaire Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
S
Setila
Membre habitué
Membre habitué
Messages : 84
Inscrit le : 21 septembre 2017
Version d'Excel : 2013FR

Message par Setila » 6 janvier 2020, 17:34

Hello à tout le monde,

Pouvez-m'aider à la création d'un calendrier pour les futurs stagiaires ?
J'aimerais créer un userform afin d'indiquer le nom du stagiaire et la période du stage, qui seront mis sur le calendrier!
Avec un code couleur afin de ne pas dépasser le cota maximum indiquer sur le haut du calendrier ( ex: 3 personnes max)
Si 3 personnes sur la même période donc la période sera en rouge et en vert si maximum pas atteint.

Dois-je travailler avec une mfc ou un userform ?

Merci d'avance pour votre aide.

Setila
Calendrier.xlsm
(227.47 Kio) Téléchargé 20 fois
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'197
Appréciations reçues : 197
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 7 janvier 2020, 11:08

Bonjour,

Pour exemple, voici un planning de stagiaires avec plusieurs visualisations : par lieu de stage/par stagiaire, stage accepté ou non, ...

Ca pourrait peut donner des idées

Pierre
Nouveau_Planning_Stagiaires_v1b.zip
(103.17 Kio) Téléchargé 31 fois
S
Setila
Membre habitué
Membre habitué
Messages : 84
Inscrit le : 21 septembre 2017
Version d'Excel : 2013FR

Message par Setila » 21 janvier 2020, 00:21

Hello pierrep56,

Merci pour ton aide mais il y a une erreur!
Capture.PNG
Bonne soirée

Setila
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'197
Appréciations reçues : 197
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 21 janvier 2020, 09:13

Bonjour, ce n'est pas une erreur.

Le message dit : "Fichier d'une archive compressé. Lancement impossible. Copier et coller les fichiers dans un nouveau dossier"

En fait c'est que c'est un fichier d'une archive compressé, le lancement est donc impossible.
Il convient alors de "Copier et coller les fichiers dans un nouveau dossier"

En bref : dézippper les fichiers avant utilisation.

Est-ce que c'est plus clair?
Pierre

PS : il faudrait peut être simplement lire le contenu des messages affichés, non? Ou demander à un stagiaire de le faire ...
S
Setila
Membre habitué
Membre habitué
Messages : 84
Inscrit le : 21 septembre 2017
Version d'Excel : 2013FR

Message par Setila » 21 janvier 2020, 14:46

Bonjour pierrep56,

Sorry!!! c'est juste impressionnant ton fichier!
Merci beaucoup

Bonne journée

Setila
Avatar du membre
leakim
Membre impliqué
Membre impliqué
Messages : 1'809
Appréciations reçues : 13
Inscrit le : 11 décembre 2012
Version d'Excel : 2010 - 2016 FR
Téléchargements : Mes applications

Message par leakim » 25 janvier 2020, 22:43

Salut,
Encore un fichier nickel de PierreP56.
J'aimerai savoir si il est possible d'ajouter une combo pour faire un filtre avec l'etat.
Si on choisit "accepté" ou "annulé" par exemple, ce sont que ces infos qui s'affichent?

J'ai bien tenté d'ajouter
        Req = "SELECT `Id`," & Rq(cbx1) & _
              " ,`P_stagiaire`&' '&`N_stagiaire` AS Nom,`Début`,`Fin`,`Etat` " & _
              " FROM [Data$] " & _
              " WHERE NOT (`Fin` < " & deb & " OR `Début` > " & fin & ")" & _
              " AND `Etat` =  ComboxBox2.value " &_
              " ORDER BY " & Rq(cbx1) & ", `N_stagiaire`"
mais je coince.

Merci pour le retour

Leakim
On apprend par des essais/erreurs. L'erreur, serait de ne pas en faire... :noel:
Image
Avatar du membre
leakim
Membre impliqué
Membre impliqué
Messages : 1'809
Appréciations reçues : 13
Inscrit le : 11 décembre 2012
Version d'Excel : 2010 - 2016 FR
Téléchargements : Mes applications

Message par leakim » 26 janvier 2020, 10:32

Re,

J'ai fini par trouvé ;;)
        RqOp = Array("'Accepté'", "'Annulé'", "'En attente'")

        Req = "SELECT `Id`," & Rq(cbx1) & _
              " ,`P_stagiaire`&' '&`N_stagiaire` AS Nom,`Début`,`Fin`,`Etat` " & _
              " FROM [Data$] " & _
              " WHERE NOT (`Fin` < " & Deb & " OR `Début` > " & Fin & ")" & _
              " AND Etat= " & RqOp(cbx3) & _
              " ORDER BY " & Rq(cbx1) & ",`N_stagiaire`"
Je savais bien qu'il y avait un truc avec les apostrophes

Leakim
On apprend par des essais/erreurs. L'erreur, serait de ne pas en faire... :noel:
Image
S
Setila
Membre habitué
Membre habitué
Messages : 84
Inscrit le : 21 septembre 2017
Version d'Excel : 2013FR

Message par Setila » 30 janvier 2020, 09:59

Hello tout le monde,

Je n'arrive pas à changer le Graph (par semaine et non par 15j)
Pouvez-vous m'aider car j'ai essayé en ajoutant des colonnes et en modifiant cette ligne de code :

L = 1 + .Columns((Month(Dt1) + 1) * 2).Left + (.Range("D2").Width / 7 * Day(Dt1))
T = 2 + .Rows(lg).Top
W = ((Dt2 - Dt1) * .Range("D2").Width / 7) - 4
H = .Rows(lg).Height - 4
Test Planning_Stagiaires .xlsm
(150.66 Kio) Téléchargé 5 fois
Merci d'avance

setila
Avatar du membre
pierrep56
Membre impliqué
Membre impliqué
Messages : 1'197
Appréciations reçues : 197
Inscrit le : 18 juin 2014
Version d'Excel : 2016

Message par pierrep56 » 30 janvier 2020, 13:39

Bonjour,
Je n'ai jamais su choisir entre /7j ou /15j alors voilà les 2 pour le même prix
Pierre

Edit : suppression du fichier bugué
Modifié en dernier par pierrep56 le 30 janvier 2020, 17:33, modifié 1 fois.
S
Setila
Membre habitué
Membre habitué
Messages : 84
Inscrit le : 21 septembre 2017
Version d'Excel : 2013FR

Message par Setila » 30 janvier 2020, 16:02

Hello Pierrep56,

Tu es au top!!!
Merci beaucoup

Setila
Répondre
  • Sujets similaires
    Réponses
    Vues
    Dernier message