Macro récupérer date de modification – Problème Datelastemodified

[vba95]

Bonjour à tous,

J’ai récupérer sur le net, une macro qui me permets de récupérer dans un dans un fichier Excel, la liste de tous les fichiers d’un dossier ainsi que la date de modification de ces fichiers.

Le problème que je rencontre est que la date inscrite n’est pas la date de modification du fichier mais une autre date.

Vous trouverez en pièce jointe mon fichier Excel (VBA date modif) avec la macro et un autre fichier Excel (Impr écran - Date de modification) qui correspond au résultat que je voudrais obtenir.

Je pense que la solution réside dans la formule Datelastemodified mais je n’arrive pas l’inscrire correctement dans ma macro.

Si quelqu’un a une petite idée pour m’aider.

Merci par avance à tous.

@+

 

[ERIC S]

Re : Macro récupérer date de modification – Problème Datelastemodified

Bonjour

je n'ai pas eu le "courage" de regarder ton fichier

je te joins un extrait d'une petite appli quite permet de choisir le répertoire
ensuite tu "ouvres" un des fichiers du répertoire (çà c'est pas très optimisé ...)
et tu obtiens la liste des fichiers, date création, date modif

 

[BOISGONTIER]

Re : Macro récupérer date de modification – Problème Datelastemodified

Bonjour,

Function DateModifFichier(nf)
  DateModifFichier = FileDateTime(nf)
End Function

JB

 

[vba95]

Re : Macro récupérer date de modification – Problème Datelastemodified

Bonjour,

Merci pour vos réponse.
Mais malheureusement je n'arrive pas à obtenir le résultat souhaité.

Est-ce que vous pourriez m'indiquer ou placer ces formules dans ma macro.

Merci d'avance.

 

[ERIC S]

Re : Macro récupérer date de modification – Problème Datelastemodified

Re

un essai un peu bourrin (dans l'écriture, la réservation de tableau.....) mais qui doit fonctionner (à vérifier)

code dans module 2

 

[vba95]

Re : Macro récupérer date de modification – Problème Datelastemodified

Re

Ça fonctionne
MERCI

@+