Ouvrir une feuille grace à une date ?

[excelman]

Bonsoir le Forum...

J'ai 2 classeurs et je souhaite copier des valeurs du classeur A dans le classeur B. Pour ça pas trop de problèmes.
Dans le classeur B mes feuilles sont nommées de 01 à 30 ou 31 en fonction du mois en cours.
Ce que je souhaiterai savoir c'est s'il est possible d'ouvrir le classeur B sur la feuille correspondant à la date du jour. (Par exemple en lancant ma macro du classeur A le 06 mars il m'ouvre le classeur B à la feuille 06).

Merci à tous et bravo pour votre dévouement...

Cdt

 

[Fred0o]

Re : Ouvrir une feuille grace à une date ?

Bonsoir excelman,

Ce que tu demandes est possible. Testes ce code :

    Workbooks.Open Filename = Nom_du_Fichier, ReadOnly = True
    Sheets(Day(Date)).Select

Bien entendu, Nom_du_Fichier correspond au nom du fichier que tu veux ouvrir.

A+

 

[excelman]

Re : Ouvrir une feuille grace à une date ?

Merci pour ta réponse,

ça fonctionne bien mais il ne faut pas oublier les : avant le =

Workbooks.Open Filename:="nom du fichier"
Sheets(Day(Date)).Select

Merci encore

Bonne soirée

cdt