Excel Downloads Forums - Afficher un message - Copie d'une feuille vers un nouveau fichier puis fermeture du fichier d'origine

Essem · 22/12/2006, 05h16

Salut rdmoshpit et le forum,

Voici le code pour un Save As:

nom = MsgBox("Entrez le nom du fichier", vbOKOnly, "NOM DE SAUVEGARDE")

ActiveWorkbook.SaveAs Filename:= _
("C:\Chemin\Répertoire\" & nom & ".xls")

Essem

22/12/2006, 05h16	#2 (permalink)
Essem XLDnaute Junior Date d'inscription: février 2005 Localisation: Québec Version Excel : Excel 2003 (PC) Messages: 62	Re : Copie d'une feuille vers un nouveau fichier puis fermeture du fichier d'origine Salut rdmoshpit et le forum, Voici le code pour un Save As: nom = MsgBox("Entrez le nom du fichier", vbOKOnly, "NOM DE SAUVEGARDE") ActiveWorkbook.SaveAs Filename:= _ ("C:\Chemin\Répertoire\" & nom & ".xls") Essem