Bonjour,
1ère chose : penser à rendre la déclaration des variables, obligatoires avec "Option Explicit "
2ème chose : déclarer ces variables,exemple ensuite, le reste devient incompréhensible même en enlevant les "Select" inutiles,
1 2 3
| Sheets("Relevé").Range("AW3:AY3").Select ' selectionne la derniére date saisie
dernieredate = ActiveCell.Value
... |
devient
dernieredate = Sheets("Relevé").Range("AW3:AY3")
mais ça ne veut rien dire en l'état et quand tu dis que ça ne fonctionne plus, je doute que ça puisse avoir déjà fonctionné,
alors expliques-toi !!
Partager