Feuilles nommées automatiquement par date

Re

Petit ajout dans le code pour le cas où le fichier modèle serait fermé avec enregistrement des modifs :

Next J

Range("d2") = 1

End Sub

Autrement, il y a juste un truc qui me dérange. C'est le classement des mois dans le répertoire.

Peut-être en nommant les fichiers 01-janv-2011 02-févr-2011, etc ... ?

Nad

Bonjour Claude, Nad, cousinhub, Forum

Je suis très impressionné par le résultat de ce travail collectif..

Bravo!

Amicalement

re Nad,

Pour ta 1ère remarque, çà ne risque rien puisque j'initialise à 1 au début

Sheets("Fériés").Range("d2") = 1 'départ janvier

pour le classement dans le répertoire, on peut modifier cette ligne

NomFichier = .Range("d2") & "-" & Format(.Cells(1, 1), "mmm-yyyy")

Salut Amadéus et cousinhub bien sûr

Amicalement

Claude

Bonjour à tous,

je suis très impressionné par vos connaissances. Vous êtes des cracks car moi je ne comprend pas grand chose à tout ce que vous avez fait, mais vraiment, chapeau !

Je n'ai pas tout testé mais je pose une question (excusez-moi) ou est passé le premier avril ? C'est un bug ou un poisson ?

PS: Merci encore à tous.

Re

C'est une erreur (encore !)

en A1, mets cette formule :

=SI(JOURSEM(DATE(An;D2;1);2)<6;DATE(An;D2;1);SERIE.JOUR.OUVRE(DATE(An;D2;1);1;Fériés))

Normalement, c'est bon ce coup là !!!!

Nad

Ben là, je n'ai plus rien. La cellule A1 affiche 40546 ???

J'ai pris ce classeur :

MICBRET_CréationFeuilles.xls

-- Mer Nov 03, 2010 4:56 pm --

Ben là, je n'ai plus rien. La cellule A1 affiche 40546 ???

J'ai pris ce classeur :

MICBRET_CréationFeuilles.xls

Bonjour

Essaie en A1

=SERIE.JOUR.OUVRE(DATE(An;D2-1+1;0);1;Fériés)

Cordialement

Bonjour,

C'est normal !

Recopie le format de cellule des lignes en dessous

si tu veux un nouveau fichier avec les petites modif.

dis-nous

Claude

édit: voici le dernier fichier à jour avec la formule de Amadéus

Là, c'est nickel. Bravo les champions et encore merci.

Bonjour,

je sais que le sujet est résolu mais il me reste un souci. Lorsque je veux changer d'année la colonne A m'affiche #NOM?

Cela est-il du à un mauvais format de cellules ?

Merci encore de vos lumières.

Bonjour

La cellule contenant la liste déroulante des années est nommée An

Si tu ne l'as pas nommée dans ton fichier:

1) tu sélectionnes cette cellule

2) Commande de menu "Insertion" "Nom" "Définir"

Dans "Nom dans le classeur:" tu tapes An

Dans "Fait référence à:" tu tapes

=Fériés!$C$1

Cordialement

Merci,

mais cette cellule est déjà nommée comme çà et je ne peux pas changer l'année sans avoir cette anomalie.

J'ai téléchargé le fichier à nouveau, pensant que j'avais pu faire une modif sans m'en rendre compte mais cela ne change rien.