Microsoft 365 Copier lien fichier avec VBA

[Anto35200]

Bonjour au forum,

Le fichier Macros permet d’ouvrir le fichier appelé Extraction.

Lors de l’exécution pour ouvrir le fichier extraction, je souhaiterais qu’un code puisse aussi copier le chemin du fichier (C11) vers le fichier Extraction à la cellule E12.



Je voudrai savoir aussi, comment peut-on faire lorsque jeux veux changer le chemin du répertoire du mois de JUIN en JUILLET, sans modifier dans le code du VBA ?

C:\chemin du fichier\Archives\JUIN

Merci de votre aide.

 

[vgendron]

pas tout compris

Sub ouvrirFichier()

Dim chemin As String

chemin = Range("C11") 'récupère le chemin inscrit dans C11


Workbooks.Open Filename:="C:\Users\atuy\Downloads\Extraction.xlsx"  'ouvre le fichier
ActiveWorkbook.Sheets("Feuil1").Range("E12") = chemin 'activeworkbook = celui qui vient d'etre ouvert: on y colle le chemin en E12

End Sub