EDATE et macro

[Guesh]

Bonjour a tous !

J ai un problème pour intégrer comme je le voudrais dans une macro cette maudite formule EDATE... Je joins un exemple avec des explications...

si quelqu un peut m aider : merci !
[file name=test_20060413211510.zip size=9501]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/test_20060413211510.zip[/file]

 

[Jacou]

Bonsoir,

je vois un premier petit problème dans ta macro:
tu définis :
derlin1 = Sheets('ZDATES').Range('A65536').End(xlUp).Row
mais comme il n'y a rien dans ta colonne A, derlin1 prend la valeur 1

si bien que tes boucles 'FOR ... NEXT' ne s'éxécute pas puisque 2 est déjà supérieur à derlin1.

il faudrait peut-être que tu fasses :
derlin1 = Sheets('ZDATES').Range('E65536').End(xlUp).Row - non?

Quant à ta fonction EDATE je ne la connais pas

Bonne nuit

 

[pat1545.]

Bonjour;

edate est dans la liste des fonctions et si, dans une cellule, tu mets :
=edate(
et que tu cliques sur le '=' juste à côté, tu auras les arguments.

Bye

 

[Guesh]

pat1545. écrit:

Bonjour;

edate est dans la liste des fonctions et si, dans une cellule, tu mets :
=edate(
et que tu cliques sur le '=' juste à côté, tu auras les arguments.

Bye

merci pat, mais ca ne repond pas vraiment a ce que je cherche faire

bye

 

[Bebere]

bonjour Guesch,Pat,Jacou,le forum
un début de solution,pas tout compris
si problèmes tu nous reviens
à bientôt [file name=testV1_20060415104914.zip size=13266]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/testV1_20060415104914.zip[/file]

 

[phil]

bonsoir,
je me permet de proposer quelque chose (je suis débutant !)
apppel à aucune macro :
écrire dans la case concernée par le chgt de date :
=DATE(ANNEE(J12);MOIS(J12)+10;JOUR(J12))
(à adapter en anglais si votre excel est anglais !)
voilà, je ne sais pas si cela peut vous aider !
bonne soirée
Phil