Créer un dossier

Résolu
LUSTRUCRU Messages postés 91 Date d'inscription mardi 8 avril 2003 Statut Membre Dernière intervention 15 mars 2013 - 29 mai 2007 à 16:50
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 - 29 mai 2007 à 23:48
Bonjour,
j'ai une petite application sous excel  qui sauvegarde fichier Excel dans un dossier que j'ai nommé Sauvegarde Valorisation

Cette appli doit être distribuée à plusieur de mes collègues je souhaite donc créer automatiquement au lancement de l'appli (si il n'existe pas ) ce dossier sous le répertoire D:\ mes documents\

Donc deux questions:

Comment vérifier si il existe et Bypassé la procédure
le créer si il existe

Merci de vos réponses et bonne journée

7 réponses

jrivet Messages postés 7392 Date d'inscription mercredi 23 avril 2003 Statut Membre Dernière intervention 6 avril 2012 60
29 mai 2007 à 16:54
Salut,
Et avec ceci?
If Dir("C:\TOTO", vbDirectory) = vbNullString Then MkDir ( "C:\TOTO" )

@+: =89254 Ju£i?n
Pensez: Réponse acceptée
3
drikce06 Messages postés 2236 Date d'inscription lundi 29 mai 2006 Statut Membre Dernière intervention 29 mai 2008 10
29 mai 2007 à 16:52
Salut,

Comment vérifier si il existe et Bypassé la procédure >>>>> Fonction Dir()
le créer si il existe >>>>> l'inverse non?

Avec une recherche sur le site ou sur www.codyx.org la réponse en deux secondes!

 Drikce 06 (Nouveau !!! Forum Exclusivement Office Et VBA By Mortalino)

Si la réponse vous convient: Réponse acceptée < body>
0
cs_Exploreur Messages postés 4821 Date d'inscription lundi 11 novembre 2002 Statut Membre Dernière intervention 15 novembre 2016 15
29 mai 2007 à 16:53
Salut,

Regarde : MkDir

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
0
drikce06 Messages postés 2236 Date d'inscription lundi 29 mai 2006 Statut Membre Dernière intervention 29 mai 2008 10
29 mai 2007 à 16:54
Aussi oui!

 Drikce 06 (Nouveau !!! Forum Exclusivement Office Et VBA By Mortalino)

Si la réponse vous convient: Réponse acceptée < body>
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
cs_Exploreur Messages postés 4821 Date d'inscription lundi 11 novembre 2002 Statut Membre Dernière intervention 15 novembre 2016 15
29 mai 2007 à 16:55
Salut:

MkDir " D:\ mes documents"

A+
Exploreur

 Linux a un noyau, Windows un pépin

 
0
LUSTRUCRU Messages postés 91 Date d'inscription mardi 8 avril 2003 Statut Membre Dernière intervention 15 mars 2013
29 mai 2007 à 17:10
Merci à tous,
cela fonctionne parfaitement avec la ligne de code de julien
bonne journée à tous
Jfrancois
0
cs_MPi Messages postés 3877 Date d'inscription mardi 19 mars 2002 Statut Membre Dernière intervention 17 août 2018 22
29 mai 2007 à 23:48
Laisse tomber le "D:" et remplace par ThisWorkbook.Path
L'utilisateur n'aura peut-être pas toujours de D: , mais il aura toujours ThisWorkbook.Path qui est le répertoire où est ton application...

MPi
0
Rejoignez-nous