VBA-enregistrement+création/verification fichier sousfichier

Bonjour tout le monde,

Je n'arrive pas à demander à VBA pour enregistrer mon fichier à vérifier:

• si le fichier 2012 existe, si il n’existe pas alors créer fichier 2012 et sous fichier 02-2012
• si le fichier 2012 existe, vérifier si sous-fichier existe sinon le créer.

Vous verrez que j'ai crée un UF pour le choix du mois et de l'année.

Voici l'arborescence souhaitée:

testkorosifs \ 2012 \ 02-2012 \ testkorosifs 02-2012

Merciiiii

salut,

J'ai modifié ton code afin que cela fonctionne mais j'ai des doutes sur certaines parties :

While ok = False  
    nom = Chemin & "\" & annee & "\" & moisannee & "\" & NomFichier
    If Dir(nom) <> "" Then

    Else
     ok = True
   End If
Wend

Si dir(nom) ="" alors boucle infini ?

De plus au niveau utilisation, ton code va créer une arborescence a partir du fichier en cours d'utilisation, et tu sauvegades le fichier actif via la macro dans cette nouvelle arborescence, quand tu vas relancer la macro elle va recreer a nouveau une nouvelle arborescence, tu riques de te retrouver avec une mutlitude de sous repetoires.... Enfin je ne connais pas la finalité donc je me trompe peut etre.

Le probleme qu tu rencontrais est que tu copies la valuer de l'UF dans une colonne excel (format nombre) donc '01' devient '1', et la c'est le début des galeres.

Dis moi si cela te convient. Il reste du taf je pense. )

Bigdams