Copie feuille classeur dans un autre classeur

Bonjour,

J'aimerai pouvoir copier les données d'un premier classeur dans un autre.

J'extrait le premier fichier d'une machine en format csv, le nom du fichier va changer en fonction de la date et heure de l'export.

Est-il possible de pointer le fichier le plus récent?

Et deuxièmement comment copier ces données dans un autre classeur dans l'onglet DATA?

Je vous ai mis les deux fichier

7fichier-csv.zip (12.78 Ko)

J'ai déjà réussi à pointer le dernier fichier du répertoire:

[code]

Private Sub MAJ_DATA()

Dim monrep As String, monfic As String, derdate As Date, ledernier As String

monrep = "répertoire cible"

monfic = Dir(monrep & "*.csv")

derdate = DateSerial(1, 1, 1)

Do While monfic <> ""

If FileDateTime(monrep & monfic) > derdate Then

ledernier = monrep & monfic

derdate = FileDateTime(monrep & monfic)

End If

monfic = Dir

Loop

MsgBox "le plus récent des fichiers csv dans ce répertoire est " & ledernier

End Sub

Rechercher des sujets similaires à "copie feuille classeur"