XL 2021 Planning pour personnel

Moran56

XLDnaute Nouveau
Bonjour à tous,

J'ai essayé de faire un document de gestion du personnel, mais je ne suis pas satisfait du résultat, d'autant plus que le fichier ne fonctionne pas comme je voudrais !

J'ai un onglet BASE, dans lequel j'indique tous mes agents, le mois de début et de fin de la période de travail sur l'année et l'année concernée.
Le bouton PLANNING GLOBAL va créer le planning avec tous les agents.
Le bouton PLANNING AGENT va créer les onglets individuels.
Le bouton INTÉGRATION devrait compléter le planning global avec les informations saisies dans chaque planning...mais ça ne fonctionne pas.

Pourriez-vous regarder le problème d'intégration ?

Merci énormément !
Belle journée.
 

Pièces jointes

  • PLANNING PERPETUEL.xlsm
    180.3 KB · Affichages: 11

TooFatBoy

XLDnaute Barbatruc
Bonjour,

Pourriez-vous regarder le problème d'intégration ?
J'ai regardé.

Déjà il y a un problème ici, qui n'a aucune incidence directe puisque ce n'est que de l'affichage en Debug.Print :
VB:
    ' Afficher les noms des agents dans la ligne 7 pour vérification
    For colOffset = 1 To lastCol Step 2 ' Sauter les colonnes vides
        Debug.Print "Colonne " & colOffset & " : " & wsPlanningGlobal.Cells(7, colOffset).Value
    Next colOffset
Le "Step 2" ne fait pas sauter les colonnes vides, il prend une colonne sur deux.
Peut-être est-ce un reste de code avant une modification de la feuille "PLANNING GLOBAL".
[edit]
Au temps pour moi : il y a le même problème dans la macro "IntegrerPlanningsDansGlobal". :(
[/edit]


Plus gênant, problèmes sur les dates de ta feuille "PLANNING GLOBAL" :
- les "dates" des 12 premiers jours de chaque mois sont bien des dates mais sont fausses à causes de l'inversion du quantième et du mois,
- les "dates" des autres jours sont en réalité du texte.

Remplacer
VB:
wsPlanning.Cells(ligne, col + 1).Value = Format(currentDate, "dd/mm/yyyy")
par
VB:
wsPlanning.Cells(ligne, col + 1).Value = currentDate
devrait corriger les problèmes de dates. ;)
 
Dernière édition:

Moran56

XLDnaute Nouveau
Super, merci beaucoup, ça fonctionne parfaitement !
Est-ce qu'il serait possible que lors de l'intégration, les mises en forme (couleurs et format) des cellules des plannings individuels soient reproduites dans le planning global ?


Encore un énorme merci pour le temps passé à m'aider !
 

Statistiques des forums

Discussions
313 769
Messages
2 102 234
Membres
108 181
dernier inscrit
Chr1sD