Bonjour à toutes et tous
J'extrais des données au format Excel de notre ERP, cela ouvre un nouveau fichier qui ne porte jamais le même nom.
D'un fichier qui doit exploiter ces données, je désir copier les nouvelles données (du fichier ci-dessus) mais je ne trouve pas comment faire.
Voici le code que je désirai utiliser, mais qui ne va pas pour cause de nom de fichier changeant.
Sub Import_OF()
Windows("tmp014227290.txt").Activate
Range("A8:M3000").Select
Selection.Copy
Windows("Avancement OF.xlsm").Activate
Range("A25").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub
Merci pour votre aide
@+
Robert