Nom définis affichés dans leur cellule de référence

Bonjour à tous !

J'espère que vos chapeaux sont bien accrochés aujourd'hui

Je voudrais savoir si il existe une façon de reporter dans les cellules dont le nom est défini, leur nom défini.

Par exemple :

Si ma cellule A1 a un nom défini "a", comment afficher a en A1 ?

Si ma cellule B1 a un nom défini "b", comment afficher a en B1 ?

Je joins un fichier à tout hasard.

Merci et bon dimanche !

10classeur1.xlsx (7.58 Ko)

Bonjour,

Et a tout hasard, ça voudrait servir a quoi ???

Crdmt

Parfois un bon croquis vaut mieux qu'un mauvais discours ?

Bonsoir,

Pas grand chose dans ton classeur !

Essaie cette proc. :

Sub Noms()
    Dim nm As Name, Rg As Range
    On Error Resume Next
    For Each nm In ThisWorkbook.Names
        Set Rg = nm.RefersToRange
        If Err.Number = 0 Then
            Rg.Cells(1, 1) = nm.Name
        Else
            Err.Clear
        End If
    Next nm
End Sub

Cordialement.

Super, merci beaucoup MFerrand, tout fonctionne très bien !

Je trouve ça pratique de voir directement ces noms dans leur cellule de référence.

Bonne nuit à tous

Rechercher des sujets similaires à "nom definis affiches leur reference"