Et avec
MonPath = Workbooks("Instructions.xls" ).Path
Tem.SaveAs (MonPath & "\" & Instructions.Cells(1,1).Value & ".xls" )
Pour simplifier, je te suggère de différencier le nom de ton fichier, du nom de ta feuille. D'ailleurs dans ton 1er post, le nom de ton fichier excel c'est Instructions.xls et la ligne d'en dessous il devient Instruction.xls.