macro speciale

[houssam]

salut forum
je cherche un type de macro speciale qui peut créer des dossier lors de sa lancement et tout ça est lié au date systeme ,c'est a dire si en lance la macro en 15 juillet 2004 elle va creer un dossier nomé 040715
merci pour tout le monde
j'attends vos idées

 

[michel]

bonjour Houssam

pour créer un repertoire tu peux utiliser l'instruction MKDir

Format(Date, "yymmdd") , permet de nommer le repertoire au format souhaité : 040715


Sub CreerRepertoire()
On Error GoTo fin
MkDir "C:\Documents and Settings\michel\dossier\general\excel\" & Format(Date, "yymmdd")
Exit Sub
fin:
If Err = 75 Then MsgBox "Ce repertoire existe déja", vbInformation, "Message"
End Sub


bon apres midi
MichelXld

 

[houssam]

merci michel
mais est ce que je peux nomer le repertoire d'une mniere automatique en lui affecttant la date de jour (date actuelle systeme )

 

[michel]

rebonjour Houssam

je ne comprend pas ta question car justement la fonction Date "Format(Date, "yymmdd")" intégrée dans la macro permet de nommer automatiquement le dossier avec la date du jour . il te reste bien entendu à adapter le début du chemin : "C:\Documents and Settings\michel\dossier\general\excel\" en fonction de l'arborescence de ton poste de travail .

mais j'ai peu etre mal compris ce que tu cherches à faire


MichelXld

 

[houssam]

c'est ça que je cherche
Voila ,je cherche à creer un dossier automatiquement dans une date future