Fermer un classeur

Bonjour à tous ,

Je reviens de nouveau vers vous !!!

Mon semainier avance!!! Un petit problème pour le fermer après une suite de code.

Tous fonctionne jusqu'à:

Semainier_model.Close True

Le code en entier:

Sub Afficher_cumul()

'

' Afficher_cumul Macro

'

' Touche de raccourci du clavier: Ctrl+Maj+A

'

Sheets("Accueil ").Select

Sheets("Cumul").Visible = True

Sheets("Cumul").Select

Sheets("Cumul").Name = "Cumul"

Range("A16:F73").Select

Selection.Copy

Sheets("Cumul").Select

ActiveWindow.SelectedSheets.Visible = False

Sheets("Accueil ").Select

Dim CumulTotal As Workbook

Set CumulTotal = Workbooks.Open("E:\Office\Boulot\Semainier\Cumul Total.xlsm")

Semainier_model.Close True

End Sub

Bonjour

essaie

Workbooks("Semainier_model").Close

Cordialement