XL 2013 Ouvrir fichier excel en fonction de la date

[geekpok]

Bonjour,

Voilà j'ai un fichier excel pour faire des analyses et je dois aller chercher et copier un onglet nommé par exemple "prix" qui se trouve dans un autre fichier excel avec le prix des pièces qui changent tous le mois et le coller dans mon fichier d'analyse..

Je recherche donc une macro qui lorsque j'appuie sur un bouton va ouvrir le fichier par exemple "prix avril - ns.xls" pour le mois d'avril.
Le nom de fichier reste le même, il y a juste le mois qui change.

La macro va donc ouvril le fichier de prix pour le mois d'avril, ensuite copie l'onglet prix et le colle dans mon dossier analyse.

Pour cela j'ai la date dans la colonne A sous forme Jours/Mois/Année ou dans la colonne O j'ai une formule qui par rapport à la date la note en lettre ex: Avril2020

 

[Calvus]

Bonjour,

Dim onglet as string, f as Worksheet, madate as string, monclasseur as workbook

Workbooks("prix").open
sheets(madatef.Range("D5:D60").copy destination :=monclasseur.range(etc...)

Voilà, un truc dans le genre, mais difficile de t'en dire plus sans fichier.

A+

 

[geekpok]

Je ne peux pas fournir mon fichier de prix car il est confidentiel désolé.
Pour plus d'explication si la date de la cellule est 06/04/2020 alors je veux qu'il prenne le fichiers du mois d'Avril.Et si c'est 23/05/2020 il prenne le fichier du mois de Mai mais qui'l ne modifie pas les prix sur les date de Mars, je sais pas si je suis assez clair