Problème pour effacer les noms de plusieurs colonnes nommées

[Magic_Doctor]

Bonjour,

J'ai 4 colonnes nommées :
"ColonneNoms", "ColonnePrénoms", "ColonneDates" & "ColonneAssemblages"

Je voudrais effacer leurs noms.

J'ai écri ceci :
ActiveWorkbook.Names("ColonneNoms", "ColonnePrénoms", "ColonneDates", "ColonneAssemblages").Delete

Et ça ne marche pas.

Mais avec seulement 3 colonnes :
ActiveWorkbook.Names("ColonneNoms", "ColonnePrénoms", "ColonneDates").Delete

ça marche.

Comment faire pour que ça marche avec plus de 3 colonnes ?

Merci pour toute aide.

 

[Grand Chaman Excel]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

Bonjour,

Je suis surpris que ça marche avec 3 colonnes.

En fait, je ne pense pas que tu puisses effaces plusieurs noms en même temps car ".Names" retourne une collection. Tu dois accéder à chaque des objet de la collection 1 par 1.

Je crois plutôt que tu dois y aller un par un de cette façon par exemple :

    With ActiveWorkbook
        .Names("ColonneNoms").Delete
        .Names("ColonnePrénoms").Delete
        .Names("ColonneDates").Delete
        .Names("ColonneAssemblages").Delete
    End With

A+

 

[Magic_Doctor]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

Bonjour Grand Chaman Excel,

Merci pour ta réponse qui m'a permis de solutionner ce problème.
Je confirme que ça marche avec 3 colonnes, dommage que l'on ne puisse aller au-delà...

Bonne journée.

 

[Compte Supprimé 979]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

Hola Magic_Doctor

Comment faire pour que ça marche avec plus de 3 colonnes ?

Quel est ton but exacte ?
Pourquoi vouloir effacer plus de 3 colonnes en même temps ?

Sinon, tu peu utiliser ce genre d'astuce

Sub SupprimerNom()
  Dim SName As Name, TabName As String
  ' Liste des noms à supprimer
  TabName = "ColonneNoms,ColonnePrénoms,ColonneDates,ColonneAssemblages"
  ' Pour chaque nom trouver dans le classeur
  For Each SName In ActiveWorkbook.Names
    ' Si celui-ci fait partie de la liste, on le supprime
    If InStr(1, TabName, SName.Name) > 0 Then SName.Delete
  Next SName
End Sub

A+

 

[Magic_Doctor]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

¿Qué tal Bruno?

Ce sont 4 colonnes nommées dont la hauteur (identique pour les 4 colonnes) peut changer.
Je supprime les noms de ces 4 colonnes, je redéfinis la hauteur des colonnes et enfin je les renomme en assignant à chacune d'elle le même nom qu'elle avait auparavant.

 

[Compte Supprimé 979]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

¡Estoy bien, gracias

Ne veux tu pas ou ne peux tu pas nommer tes colonnes avec la fonction DECALER()
Cela te permettrais d'avoir un nom de colonne dont la référence pourrais changer automatiquement selon le contenu

A+

 

[Magic_Doctor]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

Il s'agit d'une feuille un peu tordue que je réalise pour ma fille ; à savoir regrouper des noms de personnes qui sont venues dans une agence de voyage où elle fait un stage. J'ai voulu tout automatiser, faire en sorte que l'on n'ai strictement rien à écrire (menus déroulants), et que visuellement ce soit "bô". Mais surtout, si l'on doit modifier la feuille (nouvelle colonne...) l'on n'est pas à s'arracher les cheveux en devant modifier les macros (d'où les cellules & colonnes nommées). Ça progresse, mais c'est fastidieux. Et merci encore le forum et tout son aréopage d'experts.
Ma foi, si ça te dis, je te l'envoie.

A+

 

[chris]

Re : Problème pour effacer les noms de plusieurs colonnes nommées

Bonjour

Je partage l'avis de Bruno à qui je fais la bise.
Si tu utilises des noms de colonnes faisant référence à une formule DECALER, tu n'auras plus à redéfinir la longueur par VBA.

Mais si le classeur est sous 2007 et qu'il s'agit d'une liste, tu peux aussi

• convertir cette liste en "tableau" (je maudis chaque jour cette traduction qui veut tout et rien dire dans Excel) que tu nommes par exemple Maliste (dans les options du tableau et non dans les noms😛),
• puis nommer les colonnes qui t'intéressent en te référant non à la colonne Excel mais à celle du tableau Maliste

Avantage tout est dynamique et on s'épargne les formules nommées.
Cela devrait aussi faciliter l'ajout de colonnes car les noms des colonnes du tableau Maliste suivront le déplacement ce qui n'est pas aussi simple avec DECALER.