Renommer automatiquement tous les champs d'un classeur Excel

Bonjour,

j'utilise une feuille de calculs avec plusieurs onglets pour sortir un certains nombres de valeurs. Il y a plein de calculs dans tous les sens et surtout une centaine de champs nommés.

J'ai besoin de faire 2 calculs différents (avec différentes quantités) pour arriver à mon résultat final.

Je voudrais faire un fichier de synthèse unique en mergeant les 2 classeurs, malheureusement, évidemment, quand je merge les 2 fichiers, ils utilisent les mêmes noms de champs, donc la majorité des calculs ne différencient plus les différentes quantités.....

Est-il possible, avant de merger, de renommer tous les champs d'un des 2 classeurs, en rajoutant, par exemple, "FV" à la fin de tous les champs (et tous les calculs s'updatent également avec les nouveaux noms de champs), comme ça, quand je merge les 2 fichiers, il y aura bien distinction des différents champs...

Je ne sais pas si j'ai été clair..... mais merci de votre aide.

Bonsoir,

Sub Noms() 'ajoute "FV" à la fin du nom/défini
Dim Nms As Name
Application.ScreenUpdating = False
    For Each Nms In Names
        Nms.Name = Nms.Name & "FV"
    Next Nms
End Sub

Amicalement

Claude