Projet Excel VBA

1 2 3

Bonsoir j'espère que vous allez bien ?
J'ai besoin d'aide sur un code qui ne me donne pas le résultat attendu.

Je veux que ce code me crée un sous dossier dans le repertoire Document comme suit :
"C:\Users\hp\Documents\Gestion Secretariat"

Ensuite dans le dossier "Gestion Secretariat", je veux qu'il me place un sous dossier que je vais saisir dans le Inputbox comme par exemple le mois de Juin. du genre à me donnée ;
"C:\Users\hp\Documents\Gestion Secretariat\Juin"
Et dans le Dossier Juin enregistrer exporter ma feuille en cours en PDF.

Malheureusement ça me donne ce qu'il y'a dans l'image 2

Alors que je voulais que ça soit comme dans l'image 3 avec le fichier pdf à l'intérieur.

Merci de m'aider à parfaire ce code.

Bonsoir Kodyone,

Je pense que comme pour moi, lors de votre inscription sur ce site, il vous a été demandé de lire et de respecter la charte

Alors quid de ceci

  • Pour plus de lisibilité, utilisez le bouton </> pour insérer vos codes VBA et vos formules Excel."

De plus il est préférable de mettre les images après le bonjour et la demande... non !?

Sur ce, bonne nuit

Bonjour à tous les deux,

Votre code ne peut pas fonctionner pour deux raisons :
- la première : vous avez oublié de mettre un antislash après Secretariat.

au lieu de :
Chemin = "C:\Users\hp\Documents\Gestion Secretariat" & NomDossier & "\"
lire :
Chemin = "C:\Users\hp\Documents\Gestion Secretariat\" & NomDossier & "\"

(également dans la ligne qui suit).

- en admettant que le sous-dossier C:\Users\hp\Documents existe et que vous ayez entré "Juin" dans la boite de saisie (InputBox), vous ne pouvez pas créer directement le sous-dossier C:\Users\hp\Documents\Gestion Secretariat\Juin\.

A l'aide de la fonction mkDir, vous devez créer dans l'ordre :
- C:\Users\hp\Documents\Gestion Secretariat\
- puis C:\Users\hp\Documents\Gestion Secretariat\Juin\

Si le sous-dossier C:\Users\hp\Documents\ n'existe pas, dans la même logique, vous devez créer dans l'ordre :
- C:\Users\hp\Documents\
- puis C:\Users\hp\Documents\Gestion Secretariat\
- enfin C:\Users\hp\Documents\Gestion Secretariat\Juin\

Merci beaucoup pour vos contribution, c'est résolu.

Rechercher des sujets similaires à "projet vba"