Bonjour,
 
J'ai encore un petit problème en VBA :
 
J'aimerais créer un tableau puis rajouter un nombre aléatoire de valeurs tirées d'un fichier txt. Par exemple tous les mots qui suivent le mot "Le", vous voyez l'idée ?
 
DIM montableau() AS STRING
 
Seulement je ne peux pas le redimensionner, puisque je ne connais pas le nombre de lignes qui vont être nécessaires !
Existe-t'il des tableaux qui autorisent un remplissage sans avoir défini de taille ?
 
merci

Ca serait pas plus simple de recuperer dans un 1er temps tous les mots du fichier texte et ensuite, dns un 2nd temps, créer ton tableau des mots tirés aleatoirement...?

Dans ce cas, comment je fais pour lire une 1ere fois le fichier puis remonter au début ?
J'utilise cette méthode de lecture :
 
Dim objet_fso As Scripting.FileSystemObject
Dim fichier_txt As Scripting.TextStream
 
Set objet_fso = New Scripting.FileSystemObject
Set fichier_txt = objet_fso.OpenTextFile(MON_FICHIER_TXT, ForReading)
 
With fichier_txt
 
MANIP POUR COMPTER LE NB DE FOIS LE MOT "MON MOT"
 
fichier_txt.Close  
 
Et ensuite je veux récupérer des données qui sont en même quantité que le nombre de fois où il y a "MON MOT", donc qui pourront être mises dans le tableau (1 to NB "MON MOT" ) en gros

Il faut utiliser la fonction Redim.
Attention, tu ne peux redimensionner que la dernière dimension du tableau (par exemple tableau(10,15) en tableau(10,20) et pas tableau(20,15).

Et si tu veux garder les valeurs déjà présentes dans le tableau, il faut utiliser l'option Preserve :

Redim Preserve tableau(20)

Perso je n'aime pas utiliser les tableaux...
 
je préfère les objets collections...