Bonjour à toutes et à tous,
Ayant déjà demandé quelques renseignements une fois pour un problème et je suis parti avec une solution, je réintère votre aide pour un autre problème.
J'ai un fichier qui me permet de prendre des renseignements pour un client (Fiche Signaletique Entreprise.xls). A partir de ce fichier excel, je copie certaines informations vers une feuille de synthèse (Synthèse Fiche Entreprise.xls). Tout ceci est fait via une macro.
Mon utilisateur fait des copier-coller de ce fichier pour changer le nom (Fiche Signaletique Entreprise Client A, Fiche Signaletique Entreprise Client B, ...)
Ma problèmatique est que quand il copie le fichier "Fiche Signaletique Entreprise Client A" pour créer le "Fiche Signaletique Entreprise Client C", dans ma macro le nom de fichier de change pas .. chose logique parce que le nom est inscrit en dur.
Comment puis-je faire pour que ce nom s'actualise ou vienne récupérer le nom du fichier qui est ouvert?
Voici le début de ma macro pour exemple :
Sub EnrVersSynthese2()
'
' EnrVersSynthese2 Macro
'
'
Dim wv As Workbook
Dim ws As Worksheet
Set wb = Workbooks.Open("C:\Users\ngi\Desktop\Suivi et Reporting ATC\Fiche Signaletique Entreprise\Grimal\Synthèse Fiche Signaletique.xls")
Set ws = wb.Worksheets(1)
Windows("Synthèse Fiche Signaletique.xls").Activate
Rows("2:2").Select
Selection.Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove
Windows("
Fiche Signaletique AS CONSTRUCTION.xls").Activate
Range("C9
9").Select
Selection.Copy
Windows("Synthèse Fiche Signaletique.xls").Activate
Range("A2").Select
ActiveSheet.Paste
Je vous remercie par avance !