Macro suppression gestionnaire de nom

lostheroe

XLDnaute Occasionnel
Bonjour,

J'essaye de mettre au point un macro pour supprimer automatiquement tous les noms présent dans gestionnaire de nom sauf les zones d'impression.
Malheureusement la macro supprime tout les noms sans aucune dissociation.
 

Fichiers joints

job75

XLDnaute Barbatruc
Re : Macro suppression gestionnaire de nom

Bonjour lostheroe,

Code:
Sub suppression()
Dim n As Name
For Each n In ActiveWorkbook.Names
If Not n.Name Like "*Print_Area" Then n.Delete
Next
End Sub
PS : je vous ai aussi envoyé une solution sur votre autre fil.

A+
 

lostheroe

XLDnaute Occasionnel
Re : Macro suppression gestionnaire de nom

Bonjour Job57,

Merci pour ta solution ça marche pile poile.
 

Discussions similaires


Haut Bas