Re : amelioration du fichier
Bonsoir angoul,
Je travaille à temps perdu sur ton fichier. Je m'aperçois que tu as créé un nouveau message demandant la suppression des boutons sur ta feuille, ce que j'ai justement prévu.
Loin d'être terminé, je t'envoie l'ébauche que j'ai faite jusqu'à présent, avec quelques explications:
A l'ouverture du fichier, je teste si le répertoire existe dans le disque C. Si ce n'est pas le cas, il est créé dans 'Private Sub Workbook_Open()'
J'ai repris ta macro 'Sub SaveAspdfandXlsx()' qui reste à compléter. Cette procédure copie la feuille dans un nouveau classeur, efface les boutons et enregistre ce classeur sous le nom défini par la variable 'fichier'. J'ai prévu d'enregistrer le fichier dans un seul répertoire, en ajoutant en premier "Devis" ou "Facture", mais ça ne figure pas encore dans cette version provisoire (manque de temps).
Tu remarqueras que j'ai relooké ton formulaire dans le but de simplifier la feuille 1; celà pour répondre à ta demande de suggestion.
J'en suis resté là pour le moment, j'attends ton retour pour voir si ça te convient pour continuer.
A +
Cordialement.