Utiliser une variable pour créer un dossier et sous-dossier

Bonjour,

J'ai suivi le tutoriel ci-après: Création des dossiers et sous-dossiers en VBA | Excel-Malin.com (excel-malin) afin de créer une commande VBA pour enregistrer sous un autre nom un fichier "Excel de référence" dans un nouveau dossier + sous-dossier.

Je voudrais pour la suite de mon code, utiliser une variable afin de créer un dossier avec un nom à choisir manuellement.

Exemple:

1 Sub ExempleCreationDossierAvecSousdossiers()
2 'par: Excel-Malin.com 
3 On Error GoTo ExempleErreur
4 
5 Dim NouveauDossierAvecSousDossiers As String
6 NouveauDossierAvecSousDossiers = "C:\Temp\VARIABLE\MonSousDossier\Niveau_3\Niveau_4"
7 CreerDossier (NouveauDossierAvecSousDossiers)
8 Exit Sub
9 ExempleErreur:
10 MsgBox "Une erreur est survenue..."
11 End Sub

Il est possible d'entrer une variable à la ligne 6 pour choisir un nom de dossier depuis l'UserForm de ma page Excel ?

Bien à vous,

Bonjour,

Il est possible d'entrer une variable à la ligne 6 pour choisir un nom de dossier depuis l'UserForm de ma page Excel ?

la réponse est : oui..... Mais.....

Cela dépend de l'organisation des différents éléments de votre application:

Sub ExempleCreationDossierAvecSousdossiers() est lancé par quoi ?

Le userform est-il lancé lors de l'utilisation de la sub ?

La sub est elle dans le même module que le Userform ?

...

A+

Bonjour AlgoPlus,

Tout dabord, bonne année, bonne santé et bonne fortune.

Pour résoudre mon problème, tu trouvera la réponse à tes questions ci-dessous :

Le dossier est créé lorsque j'utilise le userform :

Sub ExempleCreationDossierAvecSousdossiers()

Et la sub est dans le module userform.

Via l'userform, je souhaite ouvrir un dossier existant ou en créer un. Mais je souhaite aussi créer des fichiers dans le dossier.

La raison pour laquelle je souhaite utiliser une variable pour le chemin des dossiers, c'est pour que le nom du dossier puisse être différent. Le nom du dossier est à remplir dans l'userform.

Bien à toi, Algoplus.

Alexandre.C