enregistrement

F

Fred

Guest
Bonjour a vs tous !

Mes questions sont les suivantes:

Ccomment faire pour enregistrer une feuille automatiquement a chaque changement de date ?

Et par la meme occasion aller rechercher cette feuille par la saisie de la date ds une cellule ?

Je remercie toutes les personnes susceptiblede pouvoir m'aider
AAAhhhhh c'est bon Excel !!!
 
Z

Zon

Guest
Salut,

Le changement de date il intervient quand ? en admettant que ce soit tous les jours, on change le nom de la feuiille en position 1 par la date du jour à l'ouverture du classeur (adapter le format )
'a mettre das thisworkbook
private sub workbook_open()
sheets(1).name=format(now,"ddmmmmyyyy")
end sub

'Mettre dans le code de la feuille où tu désires appeler cette feuille
private sub worksheet_change(byval C as range)
if not application.intersect(c,[A1]) is nothing then
on error resume next
if isdate(c) then sheets(format(C,"ddmmmmyyyy")).activate
end if
end sub

Sinon un petit exemple zippé ....

A+++

Lien supprimé

Lien supprimé
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 493
Messages
2 088 956
Membres
103 990
dernier inscrit
lamiadebz