Discussion :

[nono42000]

Bonjour,
Après recherche que je continue serait il possible d'avoir un coup de main.
Je voudrais que le nom du classeur apparaisse a la place du nom du TCD a chaque ouverture du classeur puisque celui si est variable.
le nom du classeur est dans une cellule qui sera appelé par la macro pour remplacer le nom du tableau par default.
merci

[EricDgn]

Bonjour,

Une façon de faire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
Private Sub Workbook_Open()
    With ThisWorkbook
        .Worksheets("Feuil1").ListObjects(1).Name = Left(.Name, InStrRev(.Name, ".") - 1)
    End With
End Sub

A noter que si le fichier a un nom qui correspond au nom d'une cellule, p.ex A1 ou ABC3, le tableau ne pourra recevoir ce nom car il désigne déjà une cellule. Dans ce cas Excel ajoutera un _ en fin de nom pour le tableau: cellule A1 <> tableau A1_, cellule ABC3 <> tableau ABC3_

Cordialement.