Nom Fichier Exporter

Bonjour,

J'ai un petit souci avec une de mes macros. Le problème est le suivant: quand j'exporte ma feuille CUTRITE en CSV, le Nom de mon chier ainsi produit reste "NOM".

J'aimerais que le Nom se paramètre automatiquement en allant chercher ces données dans deux cellules nommées. "SOCIETE"_"NOM" dans la feuille "Feuille de débits"

Po

uvez vous m'aider?????

Bonjour

Sub EXPORT()
  Dim Plage As Object, oL As Object, oC As Object
  Dim Tmp$, Sep$
  Dim Fichier$, Chemin$, CheminFiche$, Nlig&
   With Application
      .ScreenUpdating = False
      .EnableEvents = False
      .Calculation = xlManual
   End With
'Fichier = "Base" & ".csv"
Fichier = SOCIETE & "_" & NOM & ".csv"
Chemin = "S:/Import_CutRite/"
....

A+ François