créer un nouveau dossier en vba

bonjour

est-il possible en VBA de créer un nouveau dossier, par exemple sur le bureau (desktop)?
A la main, c'est simple, on fait un clique droit sur le bureau, et on clique sur "nouveau dossier".
Maintenant, je veux faire ca automatiquement sur vba.
je vous remercie

Bonjour

Tu peux utiliser

Code:

---

1 2 3 4 5 6 7 8 9 10

'Testé avec Excel2002 & WinXp Const Cible = &H10 'Bureau Dim objShell As Object Dim objFolder As Object, objFolderItem As Object   Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(Cible) Set objFolderItem = objFolder.Self   MkDir objFolderItem.Path & "\" & "DossierPerso"

---

Comment créer un dossier ?

Comment retrouver facilement le chemin des répertoires spéciaux Windows ?

bon week end
michel

merci est comment tu fais quand t'as un dossier qui est pas le bureau mais qui est sur le bureau
par exemple:
C:\\....\Bureau\Fichier

merci

bonsoir

?

Code:

---

MkDir "C:\\....\Bureau\Fichier"

---