Nom inconnu dans le gestionnaire de noms

Bonjour

Je travaille sur un fichier Excel créé par un autre. Lorsque je duplique une feuille, j'ai le message ci-dessous.

Je n'ai moi-même nulle part défini ce nom et je ne le trouve pas non plus dans le gestionnaire de noms.

Comment savoir où se cache-t-il et comment le supprimer ?

Cela n'a a priori pas d'incidence mais je voudrais avoir un fichier "propre".

Merci de votre aide.

bonjour

n'apparait il pas dans une macro quelquonque et inusitée (module)

cordialement

Bonjour

Il y a un module que j'ai créé ; ça n'y figure pas...

Bonsoir

à faire

ActiveWorkbook.Names("_Key1").Delete

Cdt,

Bonsoir,

Voir lien et procédure à copier dans un module standard.

Cdlt.

http://support.microsoft.com/kb/119826

Bonjour

Merci à tous les deux.

Ti_chou_3 : où dois-je mettre cette commande ?

Jean-Eric : je suppose que je dois quelque part dans ce code remplacer un terme par le nom caché dans mon fichier... mais je n'arrive pas à voir où...

Bonjour,

L'objectif de la procédure est de supprimer les noms masqués (Microsoft).

Tu copies cette procédure dans un module standard de VBE et tu l'exécutes.

Tu suis ensuite les consignes, à savoir si tu veux ou pas supprimer le(s) noms(s) masqu(és).

Cdlt.

Option Explicit
' Module to remove all hidden names on active workbook
Sub Remove_Hidden_Names()
' Dimension variables.
Dim xName As Variant
Dim Result As Variant
Dim Vis As Variant

    ' Loop once for each name in the workbook.
    For Each xName In ActiveWorkbook.Names

        'If a name is not visible (it is hidden)...
        If xName.Visible = True Then
            Vis = "Visible"
        Else
            Vis = "Hidden"
        End If

        ' ...ask whether or not to delete the name.
        Result = MsgBox(prompt:="Delete " & Vis & " Name " & _
                               Chr(10) & xName.Name & "?" & Chr(10) & _
                               "Which refers to: " & Chr(10) & xName.RefersTo, _
                       Buttons:=vbYesNo)

        ' If the result is true, then delete the name.
        If Result = vbYes Then xName.Delete

        ' Loop to the next name.
    Next xName

End Sub

Hum... j'avais bien collé le code dans un module... Mais je n'avais pas cliqué sur "Macros" pour l'exécuter

Re,

Tes remerciements ont été appréciés.

Cdlt.

J'avais remercié plus haut... là j'étais trop ponteuse...

Merci Jean-Eric !

Re,

Je plaisantais.