XL 2019 Copier des fichiers ".txt" selon la date de modification ou création

Titof06 à dit:

J'ai plusieurs répertoires avec une multitudes de fichiers ".txt".
Je dois récupérer tous ces fichiers et les classer dans un répertoire dédié par rapport à une date.

Est-ce qu'Excel peut me faire cela ?

Cliquez pour agrandir...

job75 à dit:

Bonjour Titof06, le forum,

Ce n'est pas Excel qui fait cela mais Windows.

Il suffit de donner aux fichiers un nom commençant par une date au format "aaaa-mm-jj" => "2025-10-24 Fichier1.txt"

Ils seront classés automatiquement par date dans le dossier.

A+

Cliquez pour agrandir...

Titof06 à dit:

Je dois récupérer tous ces fichiers et les classer dans un répertoire dédié par rapport à une date.

Cliquez pour agrandir...

TooFatBoy à dit:

Bonjour,


Perso, je comprends qu'au départ tous les fichiers sont dans des dossiers différents, et qu'il faut les ventiler, chacun dans un dossier spécifique qui dépend de la date qui est associée au fichier.
me trompé-je ?

Si j'ai bon jusque là, la date en question est-elle contenue dans le du nom du fichier, ou faut-il la récupérer dans les données associées au fichier (date de création, date de modification, etc.) ?


As-tu cherché dans les sujets similaires sur le forum ?
On a eu il y a quelques jours une question pour déplacer des fichiers avec des chemins trop longs. Ça pourrait peut-être te servir de base de départ.

Cliquez pour agrandir...

Rheeem à dit:

ça ne devrait pas être compliqué pour récupérer les dates des fichiers

Code:

Dim fso As Object, f As Object
   Set fso = CreateObject("Scripting.FileSystemObject")
   For Each f In fso.GetFolder("C:\Dossier").Files
      Debug.Print f.Path, f.DateLastModified
   Next

Cliquez pour agrandir...