Discussion :

[Alex BI]

Hello le forum,

J'importe des feuilles dans un classeur et les noms (dont "base") s'importent aussi.

J'ai déjà une plage nommée "base" et les autres "base" se rajoutent mais en faisant référence à une autre plage, celle de la feuille importée.

Je ne veux pas de ces nouveaux noms "base" donc j'ai essayé tous les effacer puis de reconstruire mon base :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
    ActiveWorkbook.Names("base").Delete
    ActiveWorkbook.Names("base").Delete
    ActiveWorkbook.Names("base").Delete
    ActiveWorkbook.Names("base").Delete
    ActiveWorkbook.Names("base").Delete
    ActiveWorkbook.Names("base").Delete

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

    ActiveWorkbook.Names.Add Name:="base", RefersToR1C1:="=Base_2020!C1:C7"

Le probleme c'est qu'il ne m'efface pas ceux qui sont importés. Je pense que c'est parce qu’ils ont tous une "etendue" qui n'est pas "classeur", enfin c'est la seule différence que j'ai trouvé par rapport à ceux qui sont effectivement effacés.

J'ai donc deux questions :

Est-il possible de ne pas importer les noms quand j'importe ma feuille ?

Est-il possible d'effacer les noms indépendamment de leur "étendue"

merci 1000x

[mercatog]

Par hasard, regarde l'aide sur
Worksheet.names

[Menhir]

Troisième solution : ne supprimer que les noms de la feuille qui vient d'être importée.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

ActiveSheet.Names("base").Delete

Lire ça :
https://msdn.microsoft.com/fr-fr/lib...3(v=office.15)

[Alex BI]

Merci Messieurs,

j'ai compris le principe et j'ai pu l'adapter à mon problème.

[MarcelG]

Bonsoir,

Un autre point si je peux me permettre.

Eviter les R1C1 en remplaçant

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

RefersToR1C1

par (exemple)

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

RefersTo:=.Range("A1:A5")

Comme pour les formulations, le code gagnera en clarté.