Nom de fichier dans un cellule

Bonjour à Toutes et à tous,

J'ai une Macro EXCEL que je voudrais corriger, mais je ne connais pas la syntaxe ???

ActiveWorkbook.SaveAs Filename:= _

"C:\test\Base_Produit\_Base_000_.TXT" , FileFormat:= _

xlTextPrinter, CreateBackup:=False

ActiveWindow.Close

Je voudrais qu'à la place du chemin et nom de fichier entre guillement, EXCEL prenne la valeur de la CELLULE J2 d'un autre fichier [TestBASE.xls]Base_PROD!$J$2 qui contient le NOM du fichier à créer.

Chété clair ?

Merci de vos réponses,

Blaireau

Salut,

Chété clair ?

De quel ville viens tu ? Bergues ??

Quelque chose comme ça pourrait aller ?

Sub enregistrer()

Dim nom_fichier As String

Windows("Classeur2.xls").Activate 'classeur dans lequel il y a le nom du fichier
nom_fichier = Range("A1").Value ' le nom du fichier
Windows("Classeur1.xls").Activate 'on reviens sur le classeur à renommer

'on enregistre
ActiveWorkbook.SaveAs Filename:= _
"C:\test\Base_Produit\" & nom_fichier, FileFormat:= _
xlTextPrinter, CreateBackup:=False
ActiveWindow.Close

End Sub

Merki, merki, merki,

ça marche au poil !!!

Cricri