XL 2019 Remplir tableau planning avec vba

Muhadini · 14 Mars 2021

Bonsoir le forum,

Étant débutante à excel, votre aide sera la bienvenu !

J'ai un planning et j'ai créer deux formulaires un pour ajouter un horaire au planning ou une absence (à choix), pour remplir mon tableau. Et l'autre formulaire pour ajouter (à la suite avec la même forme des autres) ou supprimer un participant.

De plus, quand je change de semaine, j'aimerai que tout ce garde en changeant de semaine en semaine.... Que je puisse retrouver des absences ou un participant 2 semaines en arrières par exemple.

Merci d'avance pour votre aide...

Dudu2 · 27 Mars 2024

Et là ?

Muhadini · 14 Septembre 2021

GALOUGALOU à dit:
bonsoir muhadini bonsoir dudu bonsoir le forum

j'ai essayé de répondre à cette problèmatique en respectant le travail de dudu (trop bien le classeur)

Dans la feuille "horaires normal" le bouton charger les horaires de la semaine précédente, ouvre la feuille liste.
Cette feuille, préremplie avec les horaires de base de tous les participants, permet de choisir le personnel présent par une croix en colonne E.
Le bouton afficher le tableau de service réinitialise la feuille "horaires normal" avec les horaires par défaut, de l'ensemble du personnel présent.

une solution à découvrir
cdt
galougalou

ps une petite précision.
1er Les classeurs proposés ont l'air de contenir des informations confidentielles (nom du personnel). Si tel est le cas supprimer tous les classeurs du fil.
2eme en passant la souris sur le classeur apparait un nom, peut-être celui du créateur.
avant de poster un classeur, n'oubliez pas de supprimer toutes les informations confidentielles avec l'inspecteur de document.

Bonjour Galougalou,

J'espère que vous allez bien. Je viens de tester votre fichier.

Il y a quelque chose qui ne joue pas sur l'onglet "listes". Il ne recopie pas complètement la liste sur l'onglet "horaire_normal" (voir image en annexe).

Ma liste commence avec De Oliverira .... Et sur l'onglet "horaire_normal" elle commence avec Soret...

Mais l'idée du fichier est top et très simple à utiliser !! C'est parfait !

GALOUGALOU · 14 Septembre 2021

re
dans la macro mise à jour du module 1, cette ligne de code était fausse

VB:

For i = 6 To li

il faut la remplacer par

Code:

For i = 3 To li

cdt
galougalou

ChTi160 · 14 Septembre 2021

Bonjour Muhadini ,GALOUGALOU
ce que j'ai ajouté au Worksheet de la feuille "Listes"

VB:

Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim Derlgn as integer
Cancel = True
With ActiveSheet
Derlgn = .Cells(.Rows.Count, 6).End(xlUp).Row 'On Détermine la dernière Ligne Non vide de la Colonne "F" "Participants"
  If Not Intersect(Target, .Range(.Cells(3, 5), .Cells(derlgn, 5))) Is Nothing Then 'Si Targer dans la Bonne Plage
    Target.Value = IIf(Target.Value = Empty, "x", "")              'On met ou Enlève le "x" de la cellule
  End If
End With
End Sub

Bonne Journée
jean marie

Muhadini · 16 Septembre 2021

Bonjour à tous !!!

Merci encore pour votre aide, je suis très ravie du fichier !!

Juste une dernière question : Comment modifier ce code pour qu'il reste actif tout le temps...

'-----------------------------
'Bouton Enregistrer la semaine
'-----------------------------
Sub CommandButtonEnregistrerClick()
If SemaineModifiée Then
Call EnregistrerSemaine(Prompt:=True)
Else
'Cas anormal issu d'une présence du bouton à l'ouverture du classeur
With ThisWorkbook.Worksheets(NomFeuilleHoraire)
Call MsgBoxTemporisé("La semaine n'a pas été modifiée.", TimerMilliSecondes:=1500)
.CommandButtonEnregistrer.Visible = True
End With
End If
End Sub

ChTi160 · 16 Septembre 2021

Bonjour Muhadini
pas compris la demande !
jean marie

GALOUGALOU · 16 Septembre 2021

re
précisez dans quel classeur et dans quel module svp et comme chti160 je ne saisis pas ce que vous souhaitez.
cdt

Muhadini · 16 Septembre 2021

GALOUGALOU à dit:
re
précisez dans quel classeur et dans quel module svp et comme chti160 je ne saisis pas ce que vous souhaitez.
cdt

Dans l’onglet horaire normal, quand on change quelque chose dans la plage d’horaire et bouton en haut s’affiche { enregistrer }.

est ce que c’est possible de le laisser affiché tout le temps, non juste quand il y a une modification?

ChTi160 · 16 Septembre 2021

Re
il suffit de supprimer tout ce qui masque le Bouton
Comme cette Ligne

VB:

.CommandButtonEnregistrer.Visible = False

et tu mets sa propriété "Visible" à True
Ton fichier Modifié mais pas nettoyé Lol
jean marie

Dudu2 · 16 Septembre 2021

@Muhadini

Juste une dernière question : Comment modifier ce code pour qu'il reste actif tout le temps...

Pourquoi veux-tu que le bouton reste affiché tout le temps ?
Il ne s'affiche que si la semaine a été modifiée. C'est en même temps un indicateur de modification présente pour la semaine.

Muhadini · 21 Septembre 2021

UN grand bonjour à vous tous !!

Alors tout vas bien avec le fichier. Mais le décalage des semaines en semaines ne fonctionne pas.

Quand je passe de la semaine 38 à la semaine 39, les dates des jours ne suivent pas !!

Dudu2 · 21 Septembre 2021

Bonjour,

Il faudrait déjà savoir quelle version tu utilises.

Avec les versions Horaire V2 & Horaire V3:

Muhadini · 21 Septembre 2021

Dudu2 à dit:
Bonjour,

Il faudrait déjà savoir quelle version tu utilises.

Avec les versions Horaire V2 & Horaire V3:
Regarde la pièce jointe 1116158

J'utilise la version "Copie de une proposition avec le classeur de dudu v2 ", c'est tout bon sa marche...

Par contre mes commentaires se reporte de semaine en semaine... elle ne se garde pas pour la semaine en question comme c'était avant !

Dudu2 · 21 Septembre 2021

@Muhadini,
Ma dernière version intégrant les horaires par défaut est Horaire V3.
Je ne fais pas le suivi de la version que tu utilises. Sur de l'applicatif c'est quand même plus simple de maintenir son propre code , d'autant que les approches sont différentes.

Muhadini · 21 Septembre 2021

Dudu2 à dit:
Bonjour,

Il faudrait déjà savoir quelle version tu utilises.

Avec les versions Horaire V2 & Horaire V3:
Regarde la pièce jointe 1116158

C'est tout bon, ça fonctionne Mercii dudu

Muhadini · 29 Octobre 2021

Dudu2 à dit:
Voici la version V3 utilisant les horaires par défaut définis dans le tableau des participants sur l'idée de @GALOUGALOU.
Seules les absences sont remplacées par les horaires par défaut.

Tu as donc le choix entre 3 versions:

Horaire V2.xlsm

une proposition avec le classeur de dudu.xlsm

Horaire V3.xlsm

Les 2 dernières utilisent des horaires par défaut qu'il est impératif de maintenir à jour !

Bonsoir Dudu,

Quand j'ai un nouveau participant, je dois l'ajouter sur la liste avec ces horaires de bases. Mais après je dois l'ajouter manuellement sur toutes les prochaines semaines. Est-ce que c'est possible dès qu'on l'ajouter sur la semaine de début exemple semaine 44, que les prochaines s'ajoute également...

Et quand je rajouter un participant, les heures que j'ai rentré dans la liste ne se recopie pas dans le planning... Je dois les rentrer manuellement

Merci d'avance pour ton aide... J'utilise la version "proposition de dudu" actuellement.

XL 2019 Remplir tableau planning avec vba

Muhadini

XLDnaute Junior

Pièces jointes

Dudu2

Muhadini

XLDnaute Junior

Pièces jointes

GALOUGALOU

XLDnaute Accro

Pièces jointes

ChTi160

XLDnaute Barbatruc

Muhadini

XLDnaute Junior

ChTi160

XLDnaute Barbatruc

GALOUGALOU

XLDnaute Accro

Muhadini

XLDnaute Junior

ChTi160

XLDnaute Barbatruc

Pièces jointes

Dudu2

XLDnaute Barbatruc

Muhadini

XLDnaute Junior

Dudu2

XLDnaute Barbatruc

Muhadini

XLDnaute Junior

Dudu2

XLDnaute Barbatruc

Muhadini

XLDnaute Junior

Muhadini

XLDnaute Junior

Discussions similaires