Résolu Macro excel 2007 : Créer des dossiers avec une date de création choisie

kewan

Nouveau membre
Salut tout le forum.

J’ai besoin de votre aide.

J’ai besoin de créer plusieurs dossiers avec des dates de création antérieure à la date du jour. Dans le but de pouvoir partager ses dossiers en réseau et de pour les classer par date de créations

Dans la colonne A : les noms des différents dossiers

Dans la colonne B : les dates de créations

J’arrive à créer des dossiers avec les bons noms :

XML:
Sub créer_dossiers()

On Error Resume Next

Dim lig As Byte, cptr As Byte

lig = Range("A65536").End(xlUp).Row

For cptr = 1 To lig
     MkDir "C:\Users\kewan\Desktop\dossiers_dates\" & Cells(cptr, 1)
Next

End Sub


Mais je ne sais pas leur assigner une date de création.

D’après mes recherches je pense qu’il faut utiliser la propriété DateCreated mais je n'ai trouvé comment.

Merci de votre aide.

Kewan.
 

drul

Obscur pro du hardware
Staff
Meilleure réponse
Salut,
VBA ne sait pas modifier les d'un fichier, mais windows sait le faire, il faut donc faire appel a des fonctions system depuis VBA.

Un exemple ici:
http://www.vbforums.com/showthread.php?211862-Can-you-Set-FileDateTime-
 
Vous devez vous inscrire ou vous connecter pour répondre ici.
Derniers messages publiés
Statistiques globales
Discussions
730 152
Messages
6 718 433
Membres
1 586 425
Dernier membre
momo1612
Partager cette page
Haut