Microsoft 365 sauvegarde puis fermeture fichier

Bonjour le Forum,

Avec le commandbutton1, je souhaite qu'il valide des données , ca c'est ok grâce a Job75, mais aussi que le fichier s'enregistre et se ferme a l'issue
ci dessous code en bleu, mais cela ne fonctionne pas

Private Sub CommandButton1_Click()

F.Cells(lig, 1) = Nom
F.Cells(lig, 2) = CDate(Label4)
If Label5 <> "" Then F.Cells(lig, 3) = CDate(Label5)
Unload Me 'ferme l'UserForm

activeWorkbook.save. close true

End Sub

merci pour votre aide