créer un dossier dans un repertoire avec un textbox

[bichon]

Bonjour ou Bonsoir cela depand le moment où vous liser ce post
mon souhait serait de pouvoir grace seulement a un textbox créer un dossier je m'explique:
j'ai une userform avec un textbox, l'utilisateur rentre le nom du dossier dans le textbox et valide par ok
et j'aimerai qu'un nouveau dossier se créer dans le chemin("F:\Metachut2003\Optmet\fichesmodif\")
voila pour la premiere question
la seconde est un peu plus complexe
c'est en fait une sorte de suite du premier
alors suivez bien lol
une fois ce dossier créé j'aimerai copier des fichiers excel qui etait dans une listbox auparavant
et par la suite pouvoir les recuperer (les fichiers copier) dans une autre listbox sur une userform suivante

cette premiere listbox(listbox1) ces element s'initialise comme suivant:

Dim VarDerLigne As Integer
Dim VarPlageList As String
VarDerLigne = Sheets("Baseopt").Range("A5").End(xlDown).Row
VarPlageList = Sheets("Baseopt").Range("A5:A" & VarDerLigne).Address
ListBox1.RowSource = "Baseopt!" & VarPlageList
End Sub

ces classeurs sont contenu dans "F:\Metachut\Optmet\fiches"

je selectionne les element que je veux dans une autre listbox(listbox2)
et c'est ces element qui cooresponde a des fichier que je veux copier dans le nouveau dossier
voila jespere avoir été assez clair désolé pour l'explication un peu complexe mais j'ai pas trouver mieux
si vous avez du mal je vous enverrai un zip
je remercie enormement les gens qui m'aideront a resoudre ce gros problème
merci

bichon