Discussion :

[cobra38]

Bonjour à tous

Voici mon problème du jour

Dans le tableau en pièce jointe , j'ai constitué un calendrier (2009 )
Je voudrai qu'en fonction des éléments suivants
( voir en bas de la feuille GP ):
1 ) Le debut du cycle de RTT ici 01/01/2009
2 ) la fréquence ici ( 5 jours RTT + 3 Jours de présence ) matin + après-midi
3 ) le jour du RTT ici le vendredi

Initialisé automatiquement les plages de cellules de chaque mois
( ex: Janvier la plage C8:AG9 ) avec par exemple le texte "JNT"


Merci de votre aide

A+

[ouskel'n'or]

Tu as commencé quelque chose ? Tu as un code à nous proposer ou souhaites-tu qu'on fasse nous-même le travail ?
(J'ai vu ce que tu as laissé dans feuil1, est-ce en relation avec ce que tu veux faire ?)
Comme tu t'en doutes, le but de ce forum est d'apporter une aide en cas de difficulté ponctuelle, pas de réaliser une appli à la demande
Propose-nous ta solution. Si tu as un problème de syntaxe, nous pourrons t'aider.
Bonne journée

[cobra38]

Bien entendu il ne s'agit pas pour vous d'effectuer le travail et cela n'a jamais été mon intention
toutefois , je n'ai pas de code à proposer car je ne trouve pas la solution
à mon problème
il s'agit donc bien de remplir une plage de cellules à partir d'éléments de données citées en bas de tableau
l'exercice porte uniquement sur cela et rien d'autre
désolé de ne pas avoir pu m'exprimer plus clairement

mon problème est commun à beaucoup d'entreprises devant gérer du personnel et je me disais que l'exercice pouvait être profitable devant la "redite" annuelle

Je profite simplement et egoistement pour apprendre les méandres d'excel
avec quelques exemples concrets

merci de m'avoir lu

A+


PS : j'ai dejà des ébauches de code mais je butte sur la liaison entre données du tableau RTT et la liason avec les cellules choisies .....

[ouskel'n'or]

Ok. Ton problème est effectivement intéressant. Quelqu'un trouvera bien un moment à lui consacrer ce week-end... Surtout s'il pleut

Bonne chance.

PS - Il n'est pas impossible qu'il ait déjà été traité. Une recherche sur le forum n'a rien donné ?

[cobra38]

Mille pardons , je n'avais pas vu que le sujet avait été déplacé

Pour répondre à ta question
Non je n'ai pas trouvé de reponse dans le forum mais je ne suis pas un pros de la recherche
Mon problème pourrait peut-être se simplifier en :
comment à partir d'éléments de cellules choisies mettre à jour une plage de données ?
le pb c'est que je part d'éléments text : "ven" par ex et je dois rechercher dans la plage de cellules les correspondances et là je suis paumé....

A+

[ouskel'n'or]

Je viens de regarder ton fichier pour voir comment on pouvait organiser ça.
Ce que je suggère est l'utilisation d'un userform.
Dans l'userform, un calendrier, 3 ou 4 listes, 1 bouton de validation... pour commencer...
Liste 1 - LEGENDE (types d'absences)
Liste 2 - NUM (tu devrais m'expliquer à quoi ils correspondent - Employé ?)
Liste 3 - Matin / Après-midi

Le calendrier et ces listes serviront à renseigner chaque fiche.

Un tableau reprenant les jours fériés serait utile afin de vérifier si le RTT ou l'absence ne tombe pas sur un jour férié.
Prévois-tu quelque chose pour les week-ends ? Sont-ils travaillés ? Faut-il prévoir ici aussi pour vérifier si le RTT choisi ne tombe pas un week-end ?

Pour remplir les listes, comme ces listes existent dans la feuille liste, c'est très simple : Tu vires "Rien" de C3 et tu mets

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub UserForm_Activate()
    ListBox1.RowSource = Worksheets("Liste").Range("C3:C14").Address
    ListBox2.RowSource = Worksheets("Liste").Range("E3:E33").Address
    'etc
End Sub

Commence déjà par ça. Un calendrier plus tes 3 listes.

Pour le report de la fiche ? Déjà tu pourrais répondre à cette question : Pourquoi as-tu divisé en deux les matins et les après-midis ? Traiter quatre cellules plutôt que deux ne simplifie rien...
Autre détails véniels : Le premier janvier et le 11 novembre ne sont pas fériés ?
Pour le reste, on verra plus tard, quand tu auras les outils pour renseigner les fiches d'absence.
Bonne soirée
A+

[Gorfael]

Salut cobra38 et le forum
J'ai jeté un cil sur le fichier, mais comme je ne comprends même pas la question...
Déjà essayé de faire une affectation automatique, mais à chaque fois, ça s'est vite arrêté : impossible de gérer équitablement les veilles/jours suivants de jours fériés et W-E à rallonge, et si on a une rupture (accident ou imprévu) tout le travail s'en trouve chamboulé. C'est pour ça que tu ne trouve rien, si ce n'est des tentatives abandonnées.
Mais si tu trouves un algorythme qui tienne la route, on pourra sans doute le coder.

Juste 2 ou 3 remarques en passant :
2ourquoi 2 lignes vide de sépararion entre les mois ? 1 suffit amplement
Ligne 5 : t'aime bien de fatigué pour rien : au lieu de :
C3 : =TEXTE(C5;"jjj")
C4 : 1
C5 : =DATE($A$1;$A$5;C$4)
D3 : =TEXTE(D5;"jjj")
D4 : 2
D5 : =DATE($A$1;$A$5;C$5)
moi, je ferais :
C3 : =C4 => format de cellule personnalisé type : jjj
C4 : =DATE($A$1;((LIGNE()-4)/10)+1;1)=> format de cellule personnalisé type : j
D3 : =D4 => format de cellule personnalisé type : jjj
D4 : =C4+1 => format de cellule personnalisé type : j
en recopiant vers la droite B3 et D4, pour les autres jours

en A3 : =MAJUSCULE(TEXTE(C4;"mmmm"))
et en recopiant A3: D4 sur A13, A23, etc....

Feuille liste :
I4 : =ARRONDI(DATE(Annee;4;MOD(234-11*MOD(Annee;19);30))/7; )*7-6
I5 : =I4+1
I8 : =I4+39
I9 : =I4+49
I10 : =I4+50
et j'insèrerais une ligne avant Noël pour le 11 novembre
A+