XL 2010 Pb. de limite avec Evaluate(Names(...

pierrejean

XLDnaute Barbatruc

• 21 Juin 2019

• #2

Bonjour mécano41

Je ne suis pas fichu de t'expliquer pourquoi tes macros ont des problèmes mais
voila comment j'aurais traité le problème

 

Pièces jointes

• Essai Names 2.xlsm

  25.2 KB · Affichages: 8

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 21 Juin 2019

• #3

Bonjour pierrejean

Merci pour ces infos ; cela fonctionne!

Cordialement

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 21 Juin 2019

• #4

Bonjour.
J'ai cependant remarqué que 9 * Len("X;") +78 * Len("xx;") + Len("={}") = 255, soit la longueur de String maximale codable sur 1 octet.
Alors la limite est peut être là.

 

Vote positif 0 Vote négatif

mapomme

XLDnaute Barbatruc

Supporter XLD

• 21 Juin 2019

• #5

Bonsoir @mécano41, @pierrejean🙂, @Dranreb ,

Ceci marche sur mon Excel 2010 :

Code:

Sub Création()
  Names.Add Name:="MemDonnées", RefersTo:=Range(Range("Début"), Range("Début").End(xlDown)), Visible:=True
End Sub

Sub Récupération()
Dim T2 As Variant
  T2 = Evaluate(Names("MemDonnées").RefersTo)
  MsgBox T2(UBound(T2), 1)
End Sub

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 21 Juin 2019

• #6

Merci à tous,


Comme d'habitude lorsque l'on demande un renseignement, on simplifie pour faire cette demande et ensuite cela ne correspond plus😡

En fait, je n'utilise pas directement les données de la feuille mais je transfère à un instant donné cette plage de données dans un Variant dont je veux, plus tard récupérer les données. Lorsque je veux transformer le fichier de pierrejean pour fonctionner de cette façon, cela ne va plus...ça coince à la récup!

Voir fichier joint ; explications dans les commentaires du code

Cordialement

 

Pièces jointes

• Essai Names 3.xlsm

  22.3 KB · Affichages: 8

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 21 Juin 2019

• #7

Je pense qu'on peut en conclure qu'un nom d'une collection Name n'est pas un bon support pour mémoriser un tableau, s'il nest pas vraiment très petit.
Bien d'autres supports sont préférables selon la pérénité souhaitée: variable globale ou feuille du classeur, voire fichier.

 

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 21 Juin 2019

• #8

Oui je sais bien que l'on peut stocker dans une autre feuille mais là je ne le souhaitais pas et je trouvais cela pratique...La variable globale, non, car c'est pour récupérer ces données fugitives à l'ouverture de la session suivante ou pour les comparer au cours du déroulement du programme.

Bon, ce n'est pas grave mais je ne comprends pas bien pourquoi cette limite alors qu'EXCEL traite maintenant des tableaux énormes.

Encore merci.

Cordialement

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 21 Juin 2019

• #9

Bonsoir mécano41, Pierre, Bernard, mapomme,

Je n'ai pas été plus loin qu'au post #1.

Il s'agit de la limitation du nombre de caractères d'une formule d'un nom défini (y compris les accolades).

Pour la lecture d'un item (2ème macro) la limite est de 255 caractères.

Pour l'écriture (1ère macro), comme toutes les formules, la limite est de 8192 caractères.

Bonne nuit.

 

Vote positif 0 Vote négatif

Dranreb

XLDnaute Barbatruc

• 22 Juin 2019

• #10

Ça vaudrait le coup de vérifier si ça ne passerait pas mieux d'évaluer le nom, Evaluate("MemDonnées") ou bien [MemDonnées] plutôt que le RefersTo du nom.

 

Vote positif 0 Vote négatif

job75

XLDnaute Barbatruc

• 22 Juin 2019

• #11

Tout à fait Bernard, la limitation de 255 caractères est due au fait qu'on évalue Names("MemDonnées").RefersTo.

Si l'on évalue simplement "MemDonnées"cette limite disparaît (celle de 8192 caractères s'applique).

Fichier joint.

 

Pièces jointes

• Essai Names(1).xlsm

  25.6 KB · Affichages: 2

Vote positif 0 Vote négatif

M

mécano41

XLDnaute Accro

• 22 Juin 2019

• #12

Bonjour,

Merci à tous pour ces infos.
Bonne journée

Cordialement

 

Vote positif 0 Vote négatif