Fermer un Excel via VBA ?

Bonjour,

J'ai codé ce programme d'un bouton de formulaire qui me permet d'enregistrer un onglet Excel dans le dossier de mon choix (marqué dans la textbox1). La textbox est déjà préremplit par C:\Users\" & user & "\Downloads\ avec la variable user qui correspond au login Windows de l'utilisateur.

Sub CommandButton1_Click() 'Enregistrement du Tableau de bord

'Endroit d'enregistrement

chemin = UserForm8.TextBox1.Value

'Nom du projet

projet = Sheets("Données").Range("C3").Value

'Copie de la page

Sheets("Tableau de bord").Copy

'Nom d'enregistrement

fichier = "" & projet & " Suivi du " & Format(Date, "dd mm yyyy") & ".xls"

'Enregistrement selon chemin et nom

ActiveWorkbook.SaveCopyAs Filename:=chemin & fichier

'Fermeture du formulaire

Unload Me

End Sub

Le programme fonctionne à merveille cependant ça ouvre une page "classeur1" (ou classeurX dépendant du nombre de fois ou j'ai fait tourné ce programme dans la journée), qui ne me sert à rien. Comme le programme enregistre directement une copie dans le dossier "téléchargement", je n'ai pas besoin de cette seconde copie qui s'ouvre. Y'a t'il moyen lors de la copie d'une page de la fermer directement (c'est juste pour l'esthétique) ???

Merci

Quentin

UP ?

bonsoir,

Utilise SaveAs au lieu de SaveCopyAs

A+

En effet ça ne m'ouvre pas le fichier copie "Classeur x" mais directement "Suivi du..etc..." ce qui est acceptable.

Merci.

Rechercher des sujets similaires à "fermer via vba"