Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

générer un calendrier sur l'année

  • Initiateur de la discussion Initiateur de la discussion niki42
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

niki42

XLDnaute Occasionnel
bonsoir à tous

voilà j'aurais voulu savoir s'il était possible de générer automatiquement un calendrier de l'année en cours (avec changement d'année en début d'année) avec une feuille par mois par macro ou autre solution

si c'est possible comment faire?

Merci pour vos réponses

🙁
 
Bonsoir toute la bande

Bon je vais faire bref sinon je vais me faire engueuler par ce fameux méchant Thierry !

Donc tout est dans la Démo 😉

[ol]@+Thierry[/ol] [file name=XLD_Auto_generation_Planning.zip size=28029]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/XLD_Auto_generation_Planning.zip[/file]
 

Pièces jointes

Bonjour,

Pour l'honneur ! la Gloire et la Liberté.............. d'XLD !!!

(Alexandre Le Grand (adapté)) 🙂

Encore une fois, je vais m'agenouiller Messires,

Et vous remercier très humblement,

en vous offrant un peu de mon coeur
(et oui elle est grande la famille XLD!! 😉


Sincerèment,

Celeda
 
Bonjour tout le monde

Celeda je me permet de croire que tu m'inclus dans tes remerciements, donc merci à toi 🙂

Pascal, j'ai un service à te demander :

Supprime mon post avec ma 'démo', ridicule face au super travail de l'ami thierry 🙂

CLAP CLAP :lol:

Salut tout le monde.
 
Bonjour à tous

Ah non, Hervé, j'ai regardé ton Travail avant de me lancer dans ce Fil, et tu as une méthode bien plus rationnelle et propre pour gérer un calendrier que mes Acrobaties Barbatruquestes !

Je ne sais pas si c'est notre ami Didier qui t'a aidé sur cette partie là, mais c'est très très très bien :

For j = CLng(DateSerial(annee, i, 1)) To CLng(DateSerial(annee, i + 1, 1) - 1)

Bonne Journée à Tous
[ol]@+Thierry[/ol]

PS : Attention aux Orages !
 
re tout le monde

Je me sens d'humeur badine en ce jour.

Pascal, ta réaction me pousserait presque à ouvrir un post avec comme titre : il est dur avec moi le modérateur. 🙂

Post ou la dissertation irait bon train 😉

Thierry, je ne sais pas manipuler les dates en vba, et j'ai donc trouvé l'exercice de niki intéressant pour l'apprentissage.

Je te confirme qu'il m'a bien fallut l'aide de Didier pour cette partie (merci à lui), moi j'avais l'idée, et lui la syntaxe . 🙂

Salut
 
Salut tout le monde

Eh bien je vois que tout le monde se met en 4 pour m'aider et franchement ça fait vachement plaisir

Je ne me lasse pas de venir sur ce forum (même si j'y passe des fois beaucoup de temps!!!)


Je vais regarder tout ça.

et je reviendrai vous voir

Encore merci à tous pour votre gentillesse


@++

🙂 🙂 🙂
 
Bonjour à tous,

Quoi de plus normal Niki, c'est l'équipe XLD ...

J'ai pas mal cherché dans les anciens fils à ce sujet mais j'ai retrouvé tellement il y a des fils avec différentes choses à ce sujet.

Mais là, Hervé et Thierry, the USF's king ont frappé forts... quoi de plus normal.

A conserver tout cela ...

Bonne journée à tous.


😉
 
re

Bon j'ai pas pu résister à l'envie d' aller voir ce que vous me proposiez

Hervé c'est ce que je voulais sauf que je voulais les dates en abscisse (comme ça je peux afficher le personnel sur le côté), mais je suppose que ça doit pouvoir se modifier

thierry et ses célèbres barbatrucs: c'est bien ce que je cherchais à faire mais je ne savais pas trop comment m'y prendre.

Je vais regarder tout ça plus en détail

Merci encore


@+
 
re tout le monde

merci dan

Pas de problème niki.

donc fichier modifié suivant tes désirs, et ajout d'un bout de code pour ajouter en meme temps sur chaque feuille les noms des collaborateurs.

Cette liste se trouve en colonne 1 de la feuille base.

salut [file name=niki_20050905105825.zip size=11978]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/niki_20050905105825.zip[/file]
 

Pièces jointes

Re à tous

Merci Hervé c'est vraiment bien.
Mais comment faire pour que la date n'apparaisse que sous la forme:1 2 3 4 5 6 7....

J'ai essayé de modifier cette ligne mais sans succès

Cells(1, l) = Format(CDate(j), 'mm/dd/yy')
par
Cells(1, l) = Format(CDate(j), 'm')

:huh: :huh:
 
Bonsoir Niki, Hervé (et tout ce long Fil) et le Forum

Pour ton format il suffit de mettre 'd' et non 'm' (Day and not Month) VBA est américain 😉

.Cells(1, l) = Format(CDate(j), 'd')

Bonne Soirée
[ol]@+Thierry[/ol]

Message édité par: _Thierry, à: 05/09/2005 22:29
 
Salut à tous

Merci Thierry pour l'astuce, j'aurai du y penser!!!

Mais bon avec le fichier 'xld auto generation planning', j'ai un message d'erreur sur le PC de mon taf (poutant office XP), il y a un objet qu'il ne peut pas charger car non présent sur le PC.

Sais tu ce que ça peut être?

Merci
 
Bonsoir à tous

En fait je reviens suite à ma dernière question.
Visiblement le problème vient du controle calendar qui ne doit pas être chargé

Comment faire pour l'activer?

merci pour vos réponses


@+
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
8
Affichages
297
Réponses
7
Affichages
468
Réponses
17
Affichages
1 K
Réponses
4
Affichages
586
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…