Nommer des zones automatiquement Excel 2007 Résolu/Fermé

Question

Bonjour, 

J'ai une liste de zones que je voudrai nommer (par VBA) en fonction de la cellule en titre.

Je peux le faire facilement avec un nom fixe :
ActiveWorkbook.Names.Add Name:="Ressource", RefersTo:=f.Cells(ligne + 1, colListe)

Mais pas avec un nom variable:
      NomListe = Cells(ligne, 8)
      ActiveWorkbook.Names.Add Name:=NomListe.Value, RefersTo:=f.Cells(ligne + 1, colListe).Resize(mondico.Count)

Avez-vous une solution pôur m'aider?

Merci et bonne journée.


Configuration: Windows XP / Internet Explorer 7.0

eriiic · Answer

Bonjour,

essaie avec :
ActiveWorkbook.Names.Add Name:=NomListe, RefersTo:=f.Cells(ligne + 1, colListe).Resize(mondico.Count) 

Sinon autre syntaxe plus simple :
f.Cells(ligne + 1, colListe).Resize(mondico.Count).name = NomListe

eric

PhilFrQc · Answer

Merci Éric, mais, tes deux solutions ne fonctionnent pas.
J'Ai un message d'erreur 
"Erreur d'exécution '1004';
Erreur définir par l'application ou par l'objet"

PAr contre, en reprenant ta 2e solution et en remplaçant NomListe par "Tototo", ma liste s'appelle bien "Tototo".

Je travaille avec Excel 2007.
Est-ce qu'il y aurait une incidence?

PhilFrQc · Answer

Question à Éric et Lermite,
Comment fait-on pour se donner un coup de pied au c... ?

Vos réponses sont tout à fait correctes, ça fonctionne parfaitement.

Mon problème venait simplement du fait que la valeur de NomListe contenait une virgule! ("Nom, Prénom").

Merci encore!

Nommer des zones automatiquement Excel 2007

3 réponses

Discussions similaires