Nommer un fichier excel.

eliot34 Messages postés 2232 Date d'inscription   Statut Membre Dernière intervention   -  
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour à tous.

Je souhaiterai enregistrer et nommer une feuille excel automatiquement avec le contenu d'une cellule.

Exemple : dans la cellule A1 ce trouvre un mot "x ou y", je voudrai qu'a chaque enregistrement, le feuille prenne le mot ce trouvant dans cette cellule.

Merci pour votre aide.
A voir également:

1 réponse

Réponse 1 / 1
ccm81 Messages postés 10909 Date d'inscription   Statut Membre Dernière intervention   2 433
 
Bonjour

A mettre dans le module Workbook 

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Dim nf As String
nf = ActiveSheet.Range("A1").Value
ActiveSheet.Name = nf
ActiveWorkbook.Save
End Sub

Cdlmnt
0