Discussion :

[BDA53]

à tous !

Je cherche à connaître le code VBA pour fermer un classeur Excel.
J'ai essayé la méthode Workbooks.Close mais Excel m'affiche "Propriété Incorrect".

Quelqu'un peut-il m'aider please ?

[Stanler]

Bonjour,

Que donnerait :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
' Nom du classeur à modifier
Workbooks("Nom de ton classeur.XLS").Close SaveChanges:=True

[BDA53]

message d'erreur suivant :" L'indice n'appartient pas à la sélection"

[Stanler]

Tu as bien mis le ".xls " ou xlm si c'est un xlm ? En gros, l’extension ou l'indice est importante.
Par ailleurs tu souhaites fermer le classeur ou excel tout entier ?

Tu peux éventuellement tester :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
'Fermer le classeur actif
ActiveWorkbook.Close

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
'Fermer excel
Application.Quit

[BDA53]

application.quit fonctionne bien mais il m'est impossible d'ouvrir mes classeurs par la suite. Est-ce normal ?

[Stanler]

Application.Quit ferme complètement Excel, il faut le relancer (ou redémarrer le PC) pour rouvrir des classeurs. C'est donc normal.

Tu peux essayer ce code là :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Application.Quit 'quit excel
ActiveWorkbook.Close SaveChanges:=True 'ferme le fichier actif