Bonjour
 
 
J'ai un problème en voulant enregistrer un classeur dans le même répertoire qu'un autre.
 
Ex. :
 
Une macro contenue dans le classeur Instructions.xls demande la création d'un nouveau classeur excel.
Instruction.xls souhaite enregistrer ce classeur dans le même répertoire en le nommant comme l'indique la valeur de la cellule (1,1) de la feuille 1 de Instruction (feuille instanciée en tant que Instructions). En supposant que ce classeur non encore enregistré ait été sous le nom de Tem, j'ai écris la ligne suivante :  
 
Tem.SaveAs (Instructions.Path & "\" & Instructions.Cells(1,1).Value & ".xls" )
 
Celà me retourne une erreur. J'ai fait une erreur de syntaxe dans la concaténation ?
 
 
Merci d'avance de votre aide ...  

bonjour,
 
as tu essayé de mettre un + à la place du & ?
sinon quel est le message d'erreur ?
 

Avec des +, ça donne le même résultat : Erreur 438 'Propriété ou méthode non gérée par cet objet'
 
 
Je ne vois pas d'où ça peut venir

en utilisant un truc de ce genre ca marche ou pas
 
Set cp2 = CreateObject("Scripting.FileSystemObject" )
cp2.CopyFolder chemin1, chemin2
Name "C:\controle2023\data-excel" As chem

Instructions.Worksheets(1).Cells(1,1)

Bonjour,
Je ne comprends pas ce que veut dire Instructions.path
InstructionS étant le nom de la feuille !

 
Euh, je ne comprends pas bien ce que tu veux faire
 

 
Il faut donc préciser la cellule ? La feuille seule ne suffit pas ?
 

Instructions.Path devrait retourner le chemin (dans le séparateur \ final) où est enregistré Instruction.xls, nan ?

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.