Nommer un fichier excel.
eliot34 -  
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.

1 réponse

  1. ccm81
    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

    Discussions similaires

    question pix mot caché
    aorum10

    7 réponses