Autres Calendrier xls

[alpin2023]

Bonjour, je m'excuse par avance pour cette demande d'un ancien utilisateur de ce forum qui a perdu toutes ses compétences.
Le fichier joint me convient parfaitement, mais je voudrais que la création d'un nouveau calendrier, en changeant l'année, se fasse sur une nouvelle feuille portant le non de l'année.
Fichier xls.
Merci pour votre aide.

 

[kiki29]

Salut, si curieux voir Calendrier autonome

 

[sylvanu]

Bonjour Alpin et bienvenu sur XLD, bonjour Kiki,

qui a perdu toutes ses compétences.

XL c'est comme le vélo, ça ne s'oublie pas !

Un essai en PJ. Sans analyser le code j'ai juste rajouté cette macro qui met à jour l'année après appui sur le bouton, duplique la feuille Calendar et la renomme. Si j'ai bien tout compris.

Sub NouvelleAnnée()
    Dim Année%: On Error GoTo Fin
    Année = InputBox("Quelle année désirez vous ?")
    [theYear] = Val(Année): Calculate
    Sheets("Calendar").Copy After:=Worksheets(Worksheets.Count)
    ActiveSheet.Name = Année
Exit Sub
Fin:
    MsgBox "Format année érroné. Mettre du genre 2022."
End Sub

NB: Les PJ sont limitées à 1Mo, en dessous inutile de passer par un zip.

 

[alpin2023]

Bonjour Alpin et bienvenu sur XLD, bonjour Kiki,

XL c'est comme le vélo, ça ne s'oublie pas !

Un essai en PJ. Sans analyser le code j'ai juste rajouté cette macro qui met à jour l'année après appui sur le bouton, duplique la feuille Calendar et la renomme. Si j'ai bien tout compris.

Sub NouvelleAnnée()
    Dim Année%: On Error GoTo Fin
    Année = InputBox("Quelle année désirez vous ?")
    [theYear] = Val(Année): Calculate
    Sheets("Calendar").Copy After:=Worksheets(Worksheets.Count)
    ActiveSheet.Name = Année
Exit Sub
Fin:
    MsgBox "Format année érroné. Mettre du genre 2022."
End Sub

NB: Les PJ sont limitées à 1Mo, en dessous inutile de passer par un zip.

Bonjour,
Merci, vous avez parfaitement compris et répondu !
Salutations.

 

[alpin2023]

Bonjour, je m'excuse par avance pour cette demande d'un ancien utilisateur de ce forum qui a perdu toutes ses compétences.
Le fichier joint me convient parfaitement, mais je voudrais que la création d'un nouveau calendrier, en changeant l'année, se fasse sur une nouvelle feuille portant le non de l'année.
Fichier xls.
Merci pour votre aide.

Bonjour,

Salut, si curieux voir Calendrier autonome

Bonjour,
J'avais bien vu votre calendrier, mais je n'avais pas compris le fonctionnement., c'est dire mon niveau.........
Mais c'est bien compris maintenant !!
Merci.
Cordialement.

 

[alpin2023]

A l'époque mon pseudo était : degap05
Jetez un œil !
merci

 

[sylvanu]

Oups, vieux XLDman, désolé.
J'espère ne pas vous avoir froissé.

 

[alpin2023]

Oups, vieux XLDman, désolé.
J'espère ne pas vous avoir froissé.

Vous ne me froissâtes nullement !
Eh! oui 70 balais !
Retraite maintenant.
Là c'est juste une aide pour une infirmière, pour entrer son planning mensuel, avec un format conditionnel coloration pour cellules "jour" et cellules "nuit".
Merci encore

 

[sylvanu]

Eh! oui 70 balais ! Retraite maintenant.

Alors reprenez du collier et devenez contributeur XLD, plus on est de fous, plus on s'amuse !