archiver une feuille

Re bonjour a tous,pouriez vous svp regarder mon racourcis clavier

je voudrais faire une copie d'une feuille qui est dans un classeur
j'usque l'à tout va bien , le problemme c'est que je voudrais donner un nom automatique , et ce nom est un no de facture qui se trouve dans la cellule
p6.

Touche de raccourci du clavier: Ctrl+z
'
ActiveWindow.SmallScroll Down:=0
Range("H3:T44").Select
ActiveWindow.SmallScroll Down:=-22
Selection.Copy
Application.CutCopyMode = False
ChDir "D:\Mes Documents\NETTOYEUR\Archive"
ActiveWorkbook.SaveAs Filename:="D:\Mes Documents\NETTOYEUR\Archive\range p6.xls"
, FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False
Range("P9:S10").Select
End Sub

l'erreur se trouve je crois dans
Document\nettoyeur\archive\range p6 (c'est l'à que tout bloque) je crois que range p6 n'est pas bon
svp pourriez-vous me dire quoi changer
merci