Nettoyer les noms de cellule

leditvalentin

XLDnaute Nouveau
Bonjour,

J'ai créé plusieurs listes déroulantes à partir d'autres feuilles de mon classeur.

Pour ce faire j'ai renommé les cellules :


Mais après plusieurs modifications, je voudrais nettoyer la liste pour supprimer les doublons et celles que je n'utilise pas.



Savez vous comment je peux faire ??

Merci

Cdlt
 

JCGL

XLDnaute Barbatruc
Re : Nettoyer les noms de cellule

Bonjour à tous,

Peux-tu essayer avec ce code :

Mais il t'effacera toutes les plages nommées
(il ne peut pas y avoir de doublons...)

Code:
Option Explicit

Sub Del_Liste_Noms()

Dim CelNom As Name
 For Each CelNom In ActiveWorkbook.Names
    If Not CelNom.RefersToRange Is Nothing Then
    CelNom.Delete
    End If
  Next CelNom
End Sub
Visiblement tu es sous XL2007... A tester...

A+ à tous
 
Dernière édition:

Discussions similaires

Réponses
16
Affichages
672
Réponses
12
Affichages
514

Statistiques des forums

Discussions
312 502
Messages
2 089 047
Membres
104 011
dernier inscrit
dfr