Discussion :

[mederik]

Bonjour,

je suis en train de créer un classeur excel pour mon activité d'indépendant avec un onglet "'Matrice" dans lequel je veux pouvoir rentrer des infos variables et a partir desquelles tous mes autres onglets (CRA, BUDGET, CA, CHARGES etc...) ventilés par Année, mois seront mis a jour.

En l'occurrence, j'ai un probleme avec le calcul des dates.

L'idée de départ est que je renseigne dans une cellule une année. A partir de laquelle je vais pouvoir calculer pour chaque mois de cette année:

• le nombre de jour du mois
• le nombre de jour ouvrés
• les dates des jours fériés

Pour ma cellule A1 il y l'année de départ et ma formule est
=ANNEE(DATE(2012;1;1)) et format DATE

Prob N°1 : j'obtiens 1905 dans ma cellule. Moi je veux 2012

Pour cette année j'ai 12 cellules mois en B20 => B31 avec la formule :
=MOIS(DATE(2012;1;1)) où je fais varier mon paramètre mois de la fonction DATE en fonction du mois où je suis bien sûr et ma cellule est au format personnalisé "m"

Prob N°2 : j'obtiens 1 partout quelque soit le mois

Pour ma cellule Nombre de jour la formule est :
=JOUR(DATE(ANNEE($A1);MOIS(B20)+1;1)-1)
Prob N°2 : je n'ai que du 31

J'ai essayé diverses combinaison de formule de format de cellule mais y'a toujours un truc qui foire et là où je me suis le plus approché du bon résultat, c'est ma formule de calcul du nombre de jour qui ne fonctionne pas pour février dans le cas des années bisextiles et qui fait que je ne peux avoir confiance pour les autres mois même si ça semble bon.

Est-ce que quelqu'un pourrait m'aider svp ? Je ne comprends pas où est l'erreur.

[QuestVba]

Bonjour,

J'ai un peu regardé. En attaché ton doc avec qq modif.

Pour les deux premiers problèmes, j'ai changé le format de la cellule ->standard.

Pour le nombre de jours du mois j'ai ajouté la formule suivante en ligne 25

Code :

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

=EOMONTH(B18;0)-(EOMONTH(B18;-1))

[Philippe Tulliez]

Bonjour,
La fonction FIN.MOIS(Cellule;0) ou dans sa version anglaise EOMONTH(cellule;0) proposée par QuestVBA a le désavantage de n'être présente que depuis la version 2007 tout au moins nativement puisqu'il est possible de l'obtenir en ajoutant la macro complémentaire Utilitaire d'analyse dans la version 2003.
Une autre manière est de donner la valeur 0 au troisième argument de la fonction Date(Annee;mois;jour)
Ainsi la formule =DATE(ANNEE($A1);MOIS(A1);0) donnera le dernier jour du mois qui précède la date contenue en A1
Donc pour obtenir le dernier jour du mois en cours =DATE(ANNEE($A1);MOIS(A1)+1;0) et enfin pour avoir comme valeur le nombre de jour du mois en cours =JOUR(DATE(ANNEE($A1);MOIS(A1)+1;0)) sans oublier alors de mettre le format de la cellule en nombre et plus en date

[mederik]

Merci pour ton aide.
En effet c'est mieux mais en procédant ainsi, tu te confrontes à l'erreur que j'ai aussi rencontré dans mes essais différents à savoir que je souhaitais que mes mois soient dynamiques avec l'année.

En gros rentrer la définition de mon année en B14 et que les mois soient ceux de l'année en B14 afin de ne pas avoir chaque année a changer en dur les années de mes mois.

Or mes tentatives pour faire cela aboutissent à un planatge des calculs des nombres de jour.

Une idée ?

[mederik]

Ok je viens de réessayer avec la formule proposée par Corona et c'est ok ca marche aussi en effet. Merci pour tout

Mais alors je refomule mon poste précédent comment faire pour rendre les cellules qui définissent les mois dynamique en fonction de l'année (celles en B18:M18) dans l'exemple joins par QuestVBA et faire que cela fonctionne pour les autres calculs qui en dépendent ?

J'ai essayé en mettant dans les cellules définissant les mois :
- un nombre ==> KO
- une formule =MOIS(B20+1) ==> KO a l'affichage (quel que soit le format) et au calcul du nomùbre de jour
- une formule =MOIS(DATE($B14;1;1)) ==> OK à l'affichage mais KO au calcul du nombre de jour

moi là j'en ai marre...

En PJ mon dernier essai. Ca sembalit fonctionner mais quand j'ai modifié l'année 2012 en 2013, les calculs en ligne 26 ne changent pas toujours 28 jours à février.

[mederik]

Oui alors ce que je n'ai pas précisé c'est que je veux pouvoir choisir mon année dynamiquement mais que une fois choisie 2012 par exemple, au 1er janvier 2013, je stocke mon doc et je n'y touche plus et si je le rouvre en 2023, elle sera toujours à 2012.

Bon j'en ai marre je me paume dans ce foutu ficher et mes explications...

Je veux une liste déroulante ou je choisi mon année. une fois choisi, elle bouge plus pour ce fichier et tous mes autres calculs sont dynamiques en fonction du choix de mon année. Et je n'ai que l'année à modifier et rien d'autres.

Mon fichier comporte en fait de nombreux onglets avec des tas de formules, règles, conditions et autres complexes et tout fonctionne très bien SAUF ce ******* de calendrier de m**** avec sa formule simple que j'arrive pas à faire fonctrionner.

Ca fait 4 jours que je suis sur cette simple problématique
ras le bol

[Philippe Tulliez]

Bonjour,
Une formule est par définition dynamique.
Si tu tapes =AUJOURDHUI() dans 10 ans, si tu ouvres ton classeur, la cellule affichera la date du jour.
Donc ce que tu souhaites ne peux pas être dynamique. Soit la date doit être encodée à la main soit par VBA.

Oui alors ce que je n'ai pas précisé c'est que je veux pouvoir choisir mon année dynamiquement mais que une fois choisie 2012 par exemple, au 1er janvier 2013, je stocke mon doc et je n'y touche plus et si je le rouvre en 2023, elle sera toujours à 2012.

Tu peux aussi faire une liste dynamique par Validation de données mais cela reste de l'encodage manuel.

[Philippe Tulliez]

Merci pour ton aide.
En effet c'est mieux mais en procédant ainsi, tu te confrontes à l'erreur que j'ai aussi rencontré dans mes essais différents à savoir que je souhaitais que mes mois soient dynamiques avec l'année.

En gros rentrer la définition de mon année en B14 et que les mois soient ceux de l'année en B14 afin de ne pas avoir chaque année a changer en dur les années de mes mois.

Or mes tentatives pour faire cela aboutissent à un planatge des calculs des nombres de jour.

Une idée ?

Et bien, si l'année est en A1 (2012) et le n° des mois de B1 à M1, comme ceci.

Code :

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

=JOUR(DATE($A$1;B1+1;0))

Bonjour,

Ok je viens de réessayer avec la formule proposée par Corona et c'est ok ca marche aussi en effet. Merci pour tout

Mais alors je refomule mon poste précédent comment faire pour rendre les cellules qui définissent les mois dynamique en fonction de l'année (celles en B18:M18) dans l'exemple joins par QuestVBA et faire que cela fonctionne pour les autres calculs qui en dépendent ?

J'ai essayé en mettant dans les cellules définissant les mois :
- un nombre ==> KO
- une formule =MOIS(B20+1) ==> KO a l'affichage (quel que soit le format) et au calcul du nomùbre de jour
- une formule =MOIS(DATE($B14;1;1)) ==> OK à l'affichage mais KO au calcul du nombre de jour

moi là j'en ai marre...

Je travaille toujours en année dynamique. Le tout est de savoir comment tu veux le définir.
En reprenant mon exemple du post précédent le n° des mois de B1:M1 mais l'année calculée dynamiquement. La fonction renvoie le nombre de jour par mois.

Code :

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

=JOUR(DATE(ANNEE(AUJOURDHUI());B1+1;0))

Après, tu peux tout imaginer.

[EDIT]
Attention, je viens de relire ton post. Ce n'est pas - une formule =MOIS(B20+1) mais =MOIS(B20) + 1