Gestion des absences

Bonjour à tous,

Le fichier a été accepté en téléchargement gratuit, merci Sébastien, il se télécharge bien.

Mais j'ai eut 3 mises à jour de derniére minute gràce à ric:

  • Page réactualisée automatiquement.
  • Rajout d'un module qui trouve les dates enregistrées d'une plage et permet maintenant toutes les modifications possibles.
  • Prise en compte partout du mois de la page pour ouvrir le mini calendrier de selection de dates.
Voici la version à jour.

https://www.excel-pratique.com/fr/telechargements/gestion-du-personnel/gestion-absences-excel-no406.php

a+

fronck

Bonjour,

N'hésitez pas à proposer cette nouvelle version en validation auprès de Sébastien et de remplacer le fichier ci dessus par un lien vers votre page de téléchargement afin de n'a pas multiplier les versions disponibles.

Merci pour ce partage !

@ bientôt

LouReeD

Bonjour,

ok, çà marche.

Merci

Bonjour,

N'hésitez pas à proposer cette nouvelle version en validation auprès de Sébastien

Ce que voulais dire LouReeD, c'est de mettre à jour le fichier (au lieu de créer une nouvelle fiche).

Pour faire cela, clique sur "Modifier" depuis ton compte et remplace simplement le fichier.

Je vais donc refuser le doublon et je t'invite à mettre à jour le fichier comme indiqué

Cordialement,

Bonjour,

OK, trés bien, j'ai trouvé le "modifier".

fronck

OK, trés bien, j'ai trouvé le "modifier".

Je vois ça, mais tu as modifié le doublon refusé

Ok, j'ai vu mon erreur, je m'en occupe.

désolé

fronck

Bonjour,

En effet Sébastien c'est exactement qu'est-ce que je voulais dire !

@ bientôt

LouReeD

Bonjour,

@fronck,

J'ai téléchargé ton fichier et j'ai constaté 2 anomalies :

Les boutons 1 - Enregistrer une absence et 2 - Modifier/Annuler une absence…, déclenchent la même procédure (ouvrir_absences)

L'action sur le bouton 3 - générer les mois, me génère une erreur 400 (Office 365).

Me trompe-je ?

Cdlt.

Bonjour,

Je crois qu'il manquait un exit sub.

J'ai fait une 3éme version avec :

un cumul CP+Rtt pour accepter les changements entre les 2.

un explicatif dans un msgbox pour modifier

sans titre

Et le nombre de jours pris

a+

fronck

Bonjour Fronck,

Merci beaucoup pour ce fichier qui m'aidera énormément.

Votre fichier excel répond parfaitement à mes besoins.

Toutefois, dans ma société, lorsque l'on pose un vendredi, le samedi est décompté.

Quelqu'un qui a posé le vendredi 16 Août, et qui reprendra lundi, on décompte 2 jours.

Je n'arrive pas à savoir où modifier.

Merci d'avance et au plaisir.

Jean-Philippe

Bonjour Jipp,

J'ai fait une version qui compte et affiche en jours ouvrables.

Dis moi si y'a un souci.

a+

fronck

Bonsoir Fronck,

La modification a parfaitement fonctionnée.

J'ai pu rentrer toutes les données.

Merci beaucoup !!

Je viens de remarquer un "bug".

Dans le calendrier il dédouble une personne au lieu d'ajouter les congés sur la même colonne.

Sauf si dans l'onglet BD on les classe par AZ.

En tout cas, super boulot !!! Chapeau !

Merci

Jean-Philippe

Bonjour Jipp,

Trés bien si çà te convient.

J'ai rajouté un exit sub sur le message d'enregistrement pour pouvoir corriger avant de confirmer.

J'aimerais bien résoudre ce bug.

si tu peux faire une copie d'écran je suis preneur.

a+

fronck

Bonjour,

petite "astuce" pour sortir d'une boucle avant la fin tout en continuant le déroulé du code sans avoir à utiliser une étiquette :

            For k = 2 To 100
                If Cells(1, k) = "" Then
                    dercol = k - 1
                    Exit for
                End If
            Next k

@ bientôt

LouReeD

Bonjour,

ok, merci.

fronck

Et sinon "plus simple" :

dans le même principe que la recherche de la dernière ligne non vide :

dercol = Cells(1,Cells.Columns.Count).End(xltoLeft).Column

Et petite dernière chose, visuellement perso ça me gêne :

les cases "initiales" du personnel devraient être décalées d'une cellule vers la droite afin de se retrouvées "en face" de la cellule oblique... Mais c'est purement esthétique et purement un avis personnel !

Loin de moi l'envie de critiquer !

@ bientôt

LouReeD

c'est vrai je pense pas à m'en servir des End(xltoLeft).Column ou de Range("A6").End(xlToRight).Column.

Sinon pour les initiales à décaler, même moi je croyais qu'elles manquaient pour la derniére Sabine.

sans titre

Perso je préfére à la verticale pure même si on doit pencher la tête.

a+

fronck

Bonjour

je trouve la gestion des absences nickel

j'ai 2 problèmes quand je veux modifier l'absence j'ai le même tableau des demandes d'absences qui apparaît et l'autre j'ai l'erreur 400 qui apparaît quand je clic sur générer des mois.

j'ai bien télécharger la V3

pourrait tu me guider stp

merci

Michael

Bonjour Michael,

désolé mais sans ton fichier je vois pas, je n'ai pas ce problème sur le mien.

a+

fronck

Rechercher des sujets similaires à "gestion absences"