fermeture automatique d'un fichier avec macro

Le
Pleasehelp
Bonjour, je suis nouveau en excel.

Je veux fermé le fichier après la création (Voir code plus bas).
Quelqu'un peut m'aider?

ChDir "C:Documents and SettingsjfpaquetteMes documentsFormulaire"
ActiveWorkbook.SaveAs Filename:= _
"Nouveau fichier rapport arret de plans" & new_fichier & ".xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Pleasehelp
Le #5334851
Je veux aussi inscrire la date du jour avec le nouveau nom de fichier.


Bonjour, je suis nouveau en excel.

Je veux fermé le fichier après la création (Voir code plus bas).
Quelqu'un peut m'aider?

ChDir "C:Documents and SettingsjfpaquetteMes documentsFormulaire"
ActiveWorkbook.SaveAs Filename:= _
"Nouveau fichier rapport arret de plans" & new_fichier & ".xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse


Asterix
Le #5334731
il faut écrire application.quit


Bonjour, je suis nouveau en excel.

Je veux fermé le fichier après la création (Voir code plus bas).
Quelqu'un peut m'aider?

ChDir "C:Documents and SettingsjfpaquetteMes documentsFormulaire"
ActiveWorkbook.SaveAs Filename:= _
"Nouveau fichier rapport arret de plans" & new_fichier & ".xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse


isabelle
Le #5334711
bonjour,

ChDir "C:Documents and SettingsjfpaquetteMes documentsFormulaire"
ActiveWorkbook.SaveAs Filename:= _
"Nouveau fichier rapport arret de plans" & Format(Date, "yyyy-mm-dd") & new_fichier & ".xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse
ActiveWorkbook.Close

isabelle

Bonjour, je suis nouveau en excel.

Je veux fermé le fichier après la création (Voir code plus bas).
Quelqu'un peut m'aider?

ChDir "C:Documents and SettingsjfpaquetteMes documentsFormulaire"
ActiveWorkbook.SaveAs Filename:= _
"Nouveau fichier rapport arret de plans" & new_fichier & ".xls",
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:úlse, CreateBackup:úlse


Publicité
Poster une réponse
Anonyme