création répertoire via excel

Bonjour le forum,
Le code ci-dessous me sauvegarde le classeur dans un répertoire nommé LFEUIL du répertoire courant sans problème:
.....
Chemin = ActiveWorkbook.Path
....
ActiveWorkbook.SaveAs Filename:= _
Chemin & '\\' & 'LFEUIL' & '\\' & WS.Name & '-' & Format(Date, 'dd-mm-yyyy') & '.xls', FileFormat:=xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False, CreateBackup:=False

Par contre, si le répertoire LFEUIL n'existe pas, il sort une erreur. comment inclure dans ce code, avant la sauvegarde, le test suivant: Si répertoire 'LFEUIL' n'existe pas dans le répertoire courant alors créer le répertoire 'LFEUIL' et executer la sauvegarde.

Merci d'avance de votre aide
Amicalement