Bonjour le forum,
J'aurais besoin d'aide sur le code VBA pour une opération 'd'enregistrer sous' directe, sans passer par la fenêtre de dialogue.
Pour le moment j'utilise:
ChDir 'C:\\Toto'
Application.Dialogs(xlDialogSaveAs).Show CStr(ThisWorkbook.ActiveSheet.Range('B3').Value) & Format(Date, 'dd-mm-yyyy')
Ce qui donne automatiquement le chemin dans C:\\Toto déjà existent, le nom du fichier est repris de la cellule B3, et la date du jour s'y ajoute aussi à son nom.
Bon.
Je cherche:
- ne plus passer par l'écran Save As mais enregistrer directement le fichier (avec seulement une confirmation 'Ok, c'est enregistré' à la fin;
- si le dossier cible 'C:\\Toto' n'existe pas, qu'il soit créé automatiquement, puis le fichier enregistré dedans; si C:\\Toto existe déjà, enregistrer le fichier dedans;
- si un fichier du même nom existe déjà, surécrire l'ancien fichier automatiquement, sans demander de confirmation.
Merci d'avance pour tout conseil.
Cordialement,
Mi