Rapport de message :*
 

Re: Nommer un classeur automatiquement à la sauvegarde

Titre du sujet : Re: Nommer un classeur automatiquement à la sauvegarde
par myDearFriend! le 23/02/2008 15:33:58

Bonjour anamika, le Forum,

Tu peux essayer comme ça :
Sub Sauver()
Dim Chemin As String
    Chemin = "C:\"      'à adapter
    ThisWorkbook.SaveAs Chemin & Sheets("Feuil1").Range("G9").Text & ".xls"
End Sub

Cordialement,