salut, michel et merci mais cela ne fonctionne pas.
le pire est que dans un autre fichier j'ai utilisé la macro suivant qui fonctionne très bien, je l'ai pompé sur mon nouveau modèle et ça ne fonctionne pas , je ne compends pas!
Sub Enr_Fichier()
Dim nom_fich As String
Dim nom_wb As String
Dim magasin
enseigne = Range('B10').Value
magasin = Range('B11').Value
nom_wb = (enseigne) + ' ' + (magasin) + Str(Month(Date)) + Str(Day(Date)) + '-'
nom_fich = '\\\\Controleur\\documents\\Commercial\\DEMANDE PRIX ET CODE\\' + nom_wb + '.xls'
Application.Dialogs(xlDialogSaveAs).Show (nom_fich)
ThisWorkbook.Saved = True
End Sub
qui y a t'il la dedans qui enpeche de fonctionnerdans n4import quel fichier??
si quelqu'un trouve merci d'avance