Fermeture automatique d'excel [Résolu]

Signaler
Messages postés
12
Date d'inscription
dimanche 20 novembre 2005
Statut
Membre
Dernière intervention
8 décembre 2005
-
Messages postés
12
Date d'inscription
dimanche 20 novembre 2005
Statut
Membre
Dernière intervention
8 décembre 2005
-
Salut,

j'aimerais fermer un classeur excel, et excel après avoir sauvegarder mon classeur et tout ça en cliquant sur un bouton.

Est ce que quelqu'un peut m'aider ?



Merci d'avance et @+

Faya49

7 réponses

Messages postés
233
Date d'inscription
mercredi 26 février 2003
Statut
Membre
Dernière intervention
21 février 2009
1
Application.DisplayAlerts = False
ActiveWorkbook.SaveAs Filename:= _
"C:" & Range("A1"), _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close

Range("A1") c'est la cellule ou tu as écris le nom
3
Merci

Quelques mots de remerciements seront grandement appréciés. Ajouter un commentaire

Codes Sources 117 internautes nous ont dit merci ce mois-ci

Messages postés
233
Date d'inscription
mercredi 26 février 2003
Statut
Membre
Dernière intervention
21 février 2009
1
Est-ce un classeur que tu as ouvert en vb ou classeur deja ouvert car ça n'est pas la meme chose
Messages postés
12
Date d'inscription
dimanche 20 novembre 2005
Statut
Membre
Dernière intervention
8 décembre 2005

le classeur s"ouvre manuellement, mais il contient des macros

Faya49
Messages postés
233
Date d'inscription
mercredi 26 février 2003
Statut
Membre
Dernière intervention
21 février 2009
1
Donc c'est sous excel,
pour enregistrer et fermer un classeur excel "Classeur1.xls"
voila

ActiveWorkbook.SaveAs Filename:= _
"C:\Classeur1.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close
Messages postés
137
Date d'inscription
jeudi 10 mars 2005
Statut
Membre
Dernière intervention
6 décembre 2005

Pas besoin de mettre le chemin si tu sauvegardes le classeur sur le même chemin.

ActiveWorkbook.SaveAs Filename:= _
"C:\Classeur1.xls", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
ActiveWindow.Close

Juste sur le code de ton bouton tu mets :

Application.DisplayAlerts = False 'n'affiche pas de message
ThisWorkbook.Save
ThisWorkbook.Close
Messages postés
12
Date d'inscription
dimanche 20 novembre 2005
Statut
Membre
Dernière intervention
8 décembre 2005

est ce que qu'on peut enregistrer le classeur sous un nom qui
serait le texte écrit dans une cellule d'une feuille du classeur?

Faya49
Messages postés
12
Date d'inscription
dimanche 20 novembre 2005
Statut
Membre
Dernière intervention
8 décembre 2005

Merci beaucoup ça marche

Faya49