XL 2010 Affichage mois

[Roll]

Bonsoir le forum,
j'ai un horaire annuel pour le personnel.
Je voudrais pouvoir affiché un mois complet, suivant les besoins, février, mars , avril ou mai etc etc...
Comment faire?

 

[sylvanu]

Bonjour Roll,
Un essai en PJ avec une macro évènementielle.
Le numéro du mois à afficher est en B1.
( Pensez à activer les macros si ce n'est déjà fait )

 

[job75]

Bonjour Roll, sylvanu,

Une solution sans VBA.

Voyez le fichier joint, les formules et les 2 MFC (samedi, dimanche et bordures) sur la plage C11:AG15.

Edit suite à un MP de @Collins : attention, ce fichier fonctionne uniquement en 2023.

Pour 2024 il faut remplacer (en ligne 2) 2023 par 2024.

A+

 

[Roll]

Bonjour sylvanu,
j'aurais une autre requête: comment afficher l´horaire entre deux dates choisies (par exemple entre le 25 janvier et le 5 février)?
@job75 : ton fichier est bien, mais je ne peux pas faire de modif dans l´horaire affiché

 

[job75]

@job75 : ton fichier est bien, mais je ne peux pas faire de modif dans l´horaire affiché

Le tableau du bas est une copie du tableau du haut, il faut donc modifier le tableau du haut.

 

[sylvanu]

comment afficher l´horaire entre deux dates choisies (par exemple entre le 25 janvier et le 5 février)?

Quel horaire ?
L'horaire d'une personne ? L'horaire global ?
Où mettre le résultat ?

Une proposition en PJ.

 

[Roll]

ce serait l´horaire global à mettre au même endroit que dans la première réponse, si c'est possible

2

mer

jeu

ven

sam

dim

lun

mar

mer

jeu

ven

sam

dim

prénom

25.1

26.1

27.1

28.1

29.1

30.1

31.1

1.2

2.2

3.2

4.2

5.2

Pierre

6​

14​

14​

6​

6​

14​

14​

22​

22​

Paul

6​

6​

14​

14​

14​

6​

6​

Linda

 

[sylvanu]

ce serait l´horaire global à mettre au même endroit que dans la première réponse

Désolé, pas compris. Quelle première réponse ?
La PJ fournie ne vous convient pas ?

 

[Roll]

Je ne désire pas afficher le temps écoulé mais l'horaire de toutes les personnes entre les deux dates choisies.

 

[TooFatBoy]

Bonjour,

Un essai en pj.

 

[TooFatBoy]

Désolé, pas compris.

Salut, au lieu d'afficher un mois dont il donnerait le numéro, il veut choisir les dates de début et de fin de la période à afficher.
Du moins, je crois...

 

[sylvanu]

Bonsoir TooFatBoy,
S'il fallait comprendre ça ....

comment afficher l´horaire entre deux dates choisies

Au moins votre PJ répond à son problème.

 

[Roll]

Bonjour,
Merci TooFatBot, cela correspond exactement à ce que je recherche.
Merci également à sylvanu de s'être penché sur mon problème et désolé pour le manque de clarté

 

[Roll]

Bonjour,
je reviens vers vous pour apporter une petite amélioration à un fichier d'horaire.
Grâce à TootFatBoy, je peux afficher l'horaire du mois voulu.
Je voudrais également que cela affiche des colonnes qui se trouvent plus loin et qui correspondent au mois voulu.
Comment faire?
J'ai mis plus d'explication dans le fichier ci-joint.

 

[job75]

Bonjour à tous,

Private Sub Worksheet_Change(ByVal Target As Range)

    If Intersect(Target, Range("C2:C3")) Is Nothing Then Exit Sub
 
    On Error Resume Next

    Columns("D:PZ").Hidden = False

    ColDeb = Range("D6:NE6").Find(Format(Range("C2"), "d.m"), , xlValues, xlWhole).Column
    ColFin = Range("D6:NE6").Find(Format(Range("C3"), "d.m")).Column
    ColSup = Range("NF6:PZ6").Find(Format(Range("C2"), "mmm")).Column

    Union(Columns("D:NE"), Columns("NG:PZ")).EntireColumn.Hidden = True
    Range(Cells(1, ColDeb), Cells(1, ColFin)).EntireColumn.Hidden = False
    Columns(ColSup).Resize(, 5).Hidden = False

End Sub

Attention, les mois de la plage NG6: PZ6 doivent correspondre au format "mmm" avec les accents.

A+