Date de saisie

[Jum_o]

Bonjour,

Merci de m'aider un peu. j'aimerais créer une macro qui indique la date de saisie d'une donnée et que cette date se déplace à chaque fois en fonction de l'endroit ou la donnée a été saisie. En PJ un exemple de ce que je voudrais pour mieux me faire comprendre.

merci de votre aide

 

[tototiti2008]

Re : Date de saisie

Alors, tu vas dans le Menu Insertion - Nom - Définir
tu tapes le nom que tu veux donner au mois en cours (mois_actuel par exemple)
dans fait référence à tu tapes une formule du genre :

=DECALER(Feuil2!$B$3:$B$8;0;EQUIV(TEXTE(AUJOURDHUI();"mmmm");Feuil2!$B$9:$I$9;0)-1)

(si tu as un soucis pour comprendre cette formule, dis-moi où ça coince et je t'expliquerais)

et tu fais Ajouter et OK

ensuite, le code VBA se base sur le nom mois_courant donc pas de soucis...

 

[Jum_o]

Re : Date de saisie

C'est exactement ce que je fais regardes en PJ le résultat

 

[tototiti2008]

Re : Date de saisie

en effet, c'est parfait, sauf que tu n'as pas mis les noms des mois en ligne 5
il faut au-moins que tu ais un septembre dans la ligne 5, sinon le nom test plante et le code plantera aussi.

 

[Jum_o]

Re : Date de saisie

Je vois....mais avec ces dates sous cette forme(PJ) ca ne marche pas, tu saurais modifier le code en conséquence

 

[tototiti2008]

Re : Date de saisie

oui, ton nom test doit être défini avec la formule :

=DECALER(Feuil1!$C$6:$C$12;0;EQUIV(DATE(ANNEE(AUJOURDHUI());MOIS(AUJOURDHUI());1);Feuil1!$C$5:$O$5;0)-1)

 

[Jum_o]

Re : Date de saisie

Excelent tout ca!!!! Bon Tototiti j'ai une derniere question aprés j'arrete de te déranger. Je voudrais appliquer cette opération sur plusieurs onglets qui n'ont pas le meme nom. Peut-on remplacer "feuil1!" par un "" ou je ne sais sachant que c'est toujours les memes colonnes qui sont concernées, il y a juste le nom de l'onglet qui change.
Merci de ta réponse.

 

[tototiti2008]

Re : Date de saisie

à part par macro, pas d'idée...

 

[Jum_o]

Re : Date de saisie

Merci bcp tototiti pour ton aide, je vais me débrouiller pour la suite.

@+