Aide pour main courante presque terminée

Raphy3034

XLDnaute Nouveau
Bonjour,

Je vous adresse ma création EN AMATEUR .

Il s'agit d'une main courante informatique.
PAGE 1 : L' agent rempli les événements : J'aurai aimé rajouté à coté "HEURE" une colonne à cocher pour chaque événement souhaité qui reporte l’événement en page 3 (Une sorte de sélection d'événement important)
PAGE 2 : En bas 2 Icônes :
@ : Envoi la main courante en fin de journée par Mail (Ca fonctionne)
Boites au lettres : Envoi par mail la page 3 uniquement (Ca fonctionne)
PAGE 4 : Icone en bas rouge : "SAVE" : En appuyant sur ce bouton, on doit sauvegarder la feuille en PDF mais enregistrer avec date du jour automatique. (Ca m'écrase l'ancien donc problème )
PAGE 3 (LA PLUS IMPORTANTE) : Événement sélectionnés en page 1
Icone en bas rouge "FIN DE VACATION" : IL FAUDRAIT : Lorsque l'on appui sur ce bouton, le feuillet est figé (On ne peut plus revenir dessus) et ça engendre un nouveau feuillet vierge pour la prochaine vacation. A préciser que l'onglet de ce nouveau feuillet porte la date du jour.
J'ai déjà créer un enregistrement sur cet icone mais loin d'être performant.
Merci pour votre aide.
:p
 

Pièces jointes

  • Main-courante SECURITE.xlsm
    220.9 KB · Affichages: 34

camarchepas

XLDnaute Barbatruc
Bonjour,

Voici pour la sauvegarde,
j'ai même permis de sauvegarder plusieurs fois dans la même journée en gardant la trace.
J'ai également utilisé des variables pour que le code soit plus digeste

VB:
Sub Macrosauvemcintegrale()
Dim Titre As String
Dim Chemin As String

Titre = "Main-courante SECURITE_" & Replace(Replace(Now, "/", "_"), ":", "-") & ".pdf"
Chemin = "C:\Users\admin\Desktop\"

ActiveWorkbook.ExportAsFixedFormat Type:=xlTypePDF, Filename:=Chemin & Titre, Quality:= _
  xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, OpenAfterPublish:=False
        

End Sub
 

Raphy3034

XLDnaute Nouveau
Bonjour et Merci beaucoup. La sauve fonctionne bien...
Il reste a régler mon problème
PAGE 3 (LA PLUS IMPORTANTE)
: Événement sélectionnés en page 1
Icone en bas rouge "FIN DE VACATION" : IL FAUDRAIT : Lorsque l'on appui sur ce bouton, le feuillet est figé (On ne peut plus revenir dessus) et ça engendre un nouveau feuillet vierge pour la prochaine vacation. A préciser que l'onglet de ce nouveau feuillet porte la date du jour.
J'ai déjà créer un enregistrement sur cet icone mais loin d'être performant.

Voila un nouveau fichier avec la rectification correcte de la sauvegarde.
 

Pièces jointes

  • Main-courante SECURITE (1).xlsm
    234.1 KB · Affichages: 13

Raphy3034

XLDnaute Nouveau
J'ai fait la modif mais çà génère une page du jour avec les variables de la veille (22-04-2019). Et ensuite plus rien, message d'erreur.
Fichier en PJ
 

Pièces jointes

  • Main-courante SECURITE (2) ESSAI DU 25 04 2019.xlsm
    654.9 KB · Affichages: 26

camarchepas

XLDnaute Barbatruc
C'est normal, Tu ne peux générer qu'un nouveau onglet par jour.( Si tu veux autre chose précises )
Pour le reste, tu n'as pas précisé quels champs il faut remettre à zéro.
Le but étant bien sur de ne pas tout t'écrire, mais surtout que tu comprennes car un jour ou l'autre, il y aura un minimum de maintenance.
 

ChTi160

XLDnaute Barbatruc
Bonjour Raphy3034
Bonjour le Fil (nono), le Forum
Tu as une procédure dans le Module 1
qui je pense n'est pas à sa place !
soit :
VB:
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Bonne fin de journée
jean marie
 

camarchepas

XLDnaute Barbatruc
Bonjour ChTi, Raphy

@ Chti : Bien vu en effet , je pense que ce sont des bouts de codes récupérés au hasard du web , ou d'une appli détournée.

@Raphy : Et oui, tu utilises une procédure événementielle dans un module standard et ça ne peut pas fonctionner .

Bon y'aura du 5s à faire ....

encore un truc d'une façon générale, au lieu de dire y'a une erreur, si tu précises le message ou la réaction lors du fonctionnement c'est de suite plus positif .

Alors revenons à nos moutons, car précisions un peu courtes ( ma boule de cristal est déchargée pour le moment.)
Il faut partir du fait que seul toi sais ce que tu veux, et que seul toi dois déterminer les règles de fonctionnement.
tu verra, ensuite c'est un jeu d'enfant ......

Donc déroulement de l'utilisation :

L'on part du principe que dans le classeur au départ, l'on a 2 onglets :
la trame que l'on pourrait masquer ( Mais si changement, c'est dans celui ci qu'il faudra agir ex : Modification d'un titre ou d'une image, voir ajout d'une nouvelle information)
l'onglet de 1ere tournée qui en fonction pourtera le nom : nuit du ou jour du.

la plupart des dates sont renseignées en auto par formule en gros = aujourd’hui autrement dit la date du jour qui évoluera à 00h00.
a mon avis cette solution n'est pas très pérenne en fait, il vaudrait mieux le faire au niveau du code lorsque l'on crée le nouvel onglet.

C'est donc l'appui sur le bouton fin de vacation qui génère le nouvel onglet.
Qui et quand appui-t-on sur ce bouton ?
les vacations s'enchainent sans trou, ou faut-il prévoir des reprises aprés période sans vacation?
la sauvegarde pourrait aussi être déclenchée à ce moment là ?

A bientôt, tes réponses orienteront la suite de l'aventure ....

Nono
 

Raphy3034

XLDnaute Nouveau
Bonjour Nono, ChTi et merci pour ton aide.
Je vais être précis et complet.

La main courante sera utilisé pour 2 vacations chaque jour et pour le mois complet.
PAGE 1 :
La date de début est la date du jour automatique mais sera figé (figé car passage d'un jour à l'autre la nuit)
La date de fin est la date automatique au moment du remplissage de la main courante.
Les vacations sont généralement de 06/18 et de 18/6H (Menu déroulant) mais peuvent être de 07/19 et de 19/7H
Il y a 2 agents à chaque vacation (Menu déroulant) avec une possibilité d'un 3ème agent avec des horaires aléatoires.
Arrivée et Départ : Les agents indiquent ces variables en fonction de leur départ et leur arrivée.
''Dernière mise à jour faite le : '' C'est la date et l'heure actuelle. A chaque fois qu'il y a saisie de données, elle indique la date et l'heure de la dernière saisie.
''MATÉRIEL/SUPPORT'' : Les agents coches lors de leur prise de service.
''Observations / Dysfonctionnements : '' Les agents indiquent ce qu'ils constatent

''Rapport des événements par ordre chronologique : '' Lors de la saisie d’événements sur chaque ligne de cette colonne, l'heure se met automatiquement, et la ligne sera alors figée. Impossibilité pour l'agent de revenir sur cet événement.
A noter : Si le mot ''Alarme'' est indiqué, automatiquement il sera en rouge.
Il aurait été bien pour alimenter la page 3 ''Rapport synthétique des événements ...'' de rajouter un moyen (Cases à cocher) de sélectionner les événements les plus importants et qu'il soit transférer automatiquement sur la page 3.

PAGE 2 :
Continuité des événements.
''Cadre réservé pour les messages complémentaires'' : L'agent rédigera ce qu'il veut''
''Prochaine équipe en service'' : (Cadre vert) L'agent en poste inscrira les horaires et noms des prochains agents pour la prochaine vacation (menus déroulants pour les heures et noms).
Date automatique de la prochaine vacation.
''INTEGRALE'' et ''SYNTHETIQUE'' : Ces 2 boutons sont importants. A chaque fin de vacation, l'agent appuiera sur chaque bouton pour envoyer par mail à différents destinataires :
INTEGRALE : Les 4 pages
SYNTHETIQUE : La page 3 uniquement.

PAGE 3 :
Le haut de la page reprend les mêmes informations que la page 1 à l'identique. Si on change une variable en page 1, elle est reproduit en page 3.
Pareil pour le bas de la feuille (Cases vertes) qui reprends les infos de la page 2.
Dans ce tableau est porté automatiquement les événements les plus importants (Coché) de la page 1.
J'ai placé le bouton ''FIN DE VACATION'' ici. J'apporte l'utilité de ce bouton à la fin.

PAGE 4 :

''Transmission des consignes provisoires'' :
Le haut de la page reprend les mêmes informations que la page 1 à l'identique. Si on change une variable en page 1, elle est reproduit en page 4.
L'agent inscrira dans ce tableau le donneur d'ordre (D.ORDRE), les consignes, celui qui rédige (REDACT) et la date et heure de fin.
A chaque saisie, l'heure se met automatiquement et la ligne sera alors figée. Impossibilité pour l'agent de revenir sur cette consigne.
Petite particularité : Si la date de Fin est supérieur à la date du jour, celle ci se met en ROUGE.
En bas de la page ; ''Prise en compte des consignes '' : Les agents qui auront pris en compte les consignes, inscriront leurs noms (Menu déroulant); Alors la date et l'heure se mette automatiquement et ces données sont figées. ''VISA'' : Lorsqu'on appui sur cette case, se met ''OK, VU ! ''
Bouton SAVE : L'agent peut a tout moment enregistrer la feuille qui sera sauvegarder (sur le bureau par exemple) avec le libellé : ''Main courante - date -heure''. Il devra le faire dans tous les cas à la fin de sa vacation.

Lors de la fin de cette vacation (Jour ou Nuit), je souhaite :
L'agent qui a fini son service, en appuyant sur le bouton ''FIN DE VACATION '' (Page 3) : La feuille composé de 4 pages se fige (On ne peut plus revenir dessus) et ça engendre une nouvelle feuille vierge pour la prochaine vacation. A préciser que l'onglet de ce nouveau feuillet porte la date du jour style ''Jour 26 04 19'' ou Nuit 26 04 19''
Les vacations s’enchaînent 6/18 -18/6 - 6/18 .....

Je pense avoir été complet. Si non, n'hésitez pas a me le dire.

UN GRAND MERCI !
Raphy


Donc déroulement de l'utilisation :

L'on part du principe que dans le classeur au départ, l'on a 2 onglets :
la trame que l'on pourrait masquer ( Mais si changement, c'est dans celui ci qu'il faudra agir ex : Modification d'un titre ou d'une image, voir ajout d'une nouvelle information)
l'onglet de 1ere tournée qui en fonction portera le nom : nuit du ou jour du.

la plupart des dates sont renseignées en auto par formule en gros = aujourd’hui autrement dit la date du jour qui évoluera à 00h00.
a mon avis cette solution n'est pas très pérenne en fait, il vaudrait mieux le faire au niveau du code lorsque l'on crée le nouvel onglet.

C'est donc l'appui sur le bouton fin de vacation qui génère le nouvel onglet.
Qui et quand appui-t-on sur ce bouton ?
les vacations s'enchainent sans trou, ou faut-il prévoir des reprises aprés période sans vacation?
la sauvegarde pourrait aussi être déclenchée à ce moment là ?
 

Statistiques des forums

Discussions
293 047
Messages
1 928 124
Membres
183 853
dernier inscrit
ali1987