nom répertoire et cellule

  • Initiateur de la discussion JENREVENCORE
  • Date de début
J

JENREVENCORE

Guest
Bonjour,

J'ai trouvé un module pour créer un répertoire en fonction d'une entrée de message, et je l'ai simplement modifié pour qu'à la place, entre automatiquement un nom de cellule (où il pourrait y avoir une date, par exemple). Le problème, c'est que malgré la condition d'existence, quand le répertoire à ce nom existe déjà, il en crée un autre à l'intérieur de l'existant, et au même nom. Comment lui interdire cette action?
Voici le prog:

Sub CreationRepavecNomCell
Dim NewFolder As String: NewFolder = CurDir()
NewFolder = [zozo]
If Dir(NewFolder, 16) = '' Then MkDir NewFolder
ChDir NewFolder
End Sub

Merci de votre réponse
 

Discussions similaires

Membres actuellement en ligne

Statistiques des forums

Discussions
312 493
Messages
2 088 956
Membres
103 990
dernier inscrit
lamiadebz