Comment stocker beaucoup de données dans une variable?

Bonjour le forum,

Je vous explique mon problème :
Afin de faire tourner un algorithme génétique, j'ai besoin de mettre une grande quantité de données dans un tableau que je stocke dans une variable VBA (qui est d'un 'Type' que j'ai créé).

Or Excel VBA limite la taille des variables de type perso à 64 Ko... trop petit pour mon application!
En gros je créé un individu qui a un certain nombre de caractéritiques (dont 4600 entiers) pas toutes du même type, et une population qui contient un certain nombre d'individus ainsi qu'un entier pour l'indexer.

Voici mon code :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

public const TailleIndividu = 4600 public const TaillePopulation = 100   Public Type Individu Index as integer Caracteritique(TailleIndividu) as integer Poids as Single End Type   Public Type Population Personne(TaillePopulation) as Individu Index as Integer End Type   Dim Generation1 as Population '===> bim erreur de compilation, 'une donnée fixe ou statique 'ne peu pas dépasser 64 Ko

---

Dans quel genre de structure dois-je alors stocker mon tableau 'Population'?
Est-il possible de stocker plusieur type de variables dans une Collection?
Est-ce que je peu utiliser une classe? On peu mettre un tableau dans une classe?
Est-ce que je devrait pas faire ça en C???

I'am in the shit help me please!!!

Merci les Devellopeurs!

Bonjour,

Je ne suis pas un grand expert vba mais je vais tenter d'apporter de l'aide.

Citation:

---

Dans quel genre de structure dois-je alors stocker mon tableau 'Population'?

---

Je crois que le problème sera récurant pour chaque type de structure.

Citation:

---

Est-il possible de stocker plusieurs type de variables dans une Collection?

---

la je ne peut répondre désoler.

Citation:

---

Est-ce que je peu utiliser une classe? On peu mettre un tableau dans une classe?

---

Oui on peut mettre un tableau dans une classe, mais le problème de mémoire sera également présent. Mais ceci est intéressant a tester.

Citation:

---

Est-ce que je ne devrais pas faire ça en C???

---

A mon avis tu va te confronter a beaucoup de problème de ce style pour développer un algorithme génétique en vba. Connaissant assez bien l'algorithme en question vba n'est pas très adapté à ceci, et le langage n'est d'ailleurs pas fait pour réaliser des applications évolué.
Tu peux appeler un programme c depuis ta macro, celui ci exécutera l'algorithme, puis récupérer les résultats. De plus je suis persuadé que ton programme sera plus rapide en c qu'en vba.

Tetar

Merci pour la vitesse de ta réponse!

Mon problème c'est que je ne maîtrise pas la notion de pointeurs dont j'aurai besoin en C

Il n'y a pas un moyen de contourner la limite de 64 Ko fixée pas le logiciel? (à part en coupant mon tableau en plein de petits bouts)

Bonjour,

Tu peux transformer tes Types en classes mais le plus simple semble de définir la taille de tes tableaux de manière dynqmique:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21

Public Const TailleIndividu = 4600 Public Const TaillePopulation = 100   Public Type Individu Index As Integer Caracteritique(TailleIndividu) As Integer Poids As Single End Type   Public Type Population Personne() As Individu Index As Integer End Type   Dim Generation1 As Population   Sub Essai() ReDim Generation1.Personne(1 To TaillePopulation) Generation1.Personne(1).Poids = 60 MsgBox Generation1.Personne(1).Poids End Sub

---

Cordialement,

Tirex28/

Citation:

---

Mon problème c'est que je ne maîtrise pas la notion de pointeurs dont j'aurai besoin en C

---

en effet mais l'apprentissage peut être intéressant . Il y as également d'autre langage pour faire ceci: vb.net,c#,java,scheme,caml...

Citation:

---

Il n'y a pas un moyen de contourner la limite de 64 Ko fixée pas le logiciel?

---

Je viens de chercher rapidement sur le web et je n'ai rien trouvé pour.

Citation:

---

(à part en coupant mon tableau en plein de petits bouts)

---

Alors la tu vas en ch..r tu iras peut être plus vite à comprendre l'utilisation des pointeurs.

Tetar

Citation:

---

le plus simple semble de définir la taille de tes tableaux de manière dynqmique:

---

sauf que le tableau dépassera la limite de 64Ko de toute façon!

Bon je pense avoir trouvé une solution grâce aux Collections :
au lieu de déclarer

Code:

---

caracteristique(TaillePopulation) as Integer

---

je fais juste

Code:

---

caracteristique as New Collection

---

et ça a l'air de passer... (en tout cas j'ai réussi à exploser ma mémoire cache avant que VBA ne limite les 64Ko...)
par contre je dois me retapper tout mon code car on ne rempli pas de la même façon un tableau et une collection...

si ça vous interresse je vous envoi mon fichier complet avec tout l'algorithme génétique. Ca peu être pas mal de le faire en VBA quand même!

Vous connaissez un bon tuto pour se former aux pointeurs?

Merci!

Re,

Citation:

---

par contre je dois me retapper tout mon code car on ne rempli pas de la même façon un tableau et une collection...

---

Pourtant cela semble fonctionner correctement, as tu essayé? Un extrait de l'aide:

Citation:

---

Envoyé par F1

Vous avez essayé d'allouer plus de 64 Ko de données de niveau module.
Réduisez la quantité de données déclarées. Notez que bien que la taille des données de niveau module soit limitée à 64 Ko, la taille des tableaux et des chaînes de longueur variable de niveau module peut être supérieure.

---

Cordialement,

Tirex28/

@Tirex28 :
ah ok tiens j'avais pas lu ça...
bon bah je vais essayer parceque là je me galère avec les Collections en fait c'est qu'une sale pile trop galère à gérer!

grrrrrrr c'est pas tout de suite que je vais être en week-end moi

Citation:

---

Envoyé par tirex28

Pourtant cela semble fonctionner correctement, as tu essayé?

---

Bon je viens d'essayer, et oui en effet ça marche... c'est là qu'on voit la difficulté de ce langage:
Je créé un tableau à taille fixe 100*4600 => message d'erreur
Je créé un tableau à taille dynamique, je le dimensionne direct à 100*4600 => tout roule !

En tout cas merci Tirex mon algo fonctionne mais wahou ça va pas vite!