renommer le classeur actif

Bonjour le forum
j'ai en fin d'une procédure ce code :

je démarre avec le classeur : 'Récap.xls'
analyse de tous les fichiers du répertoire
.......
nomfich = newclass.Name
newclass.Close False
ActiveWorkbook.SaveAs Filename:=chemin & '\\' & nomfich, FileFormat:=xlNormal

Ici je souhaiterais renommer mon classeur
'ActiveWorkbook.Name = 'Récap.xls'
mais ce code ne fonctionne pas !!!!
en espérant avoir été assez clair
merci à vous