Equivalent code VB.net en VBA

Résolu
Majo88 Messages postés 2 Statut Membre -  
Majo88 Messages postés 2 Statut Membre -
Bonjour,

Je cherche un équivalent de cette ligne de VB.net en VBA :

Dim ligne as List(Of String) = File.ReadAllLines("chemin fichier").ToList

Elle me permet de créer une liste de string avec les lignes d'un fichier texte. Je n'ai pas trouver d'équivalent pour List(Of String) et la fonction ReadAllLines de File qui lis toutes les lignes.

Merci.

2 réponses

  1. Yoda
     
    Bonjour,

    Vous devez décomposer

    Dim ligne(1000) as String 'dimensionner un tableau "ligne" de 1000 éléments de type String
    Dim i_l as Integer 'dimensionner un compteur de lignes
    
    Open "FICHIER.TXT" for input as #1 'remplacez FICHIER.TXT par votre fichier
    i_l=0
    While not eof(1)
    i_l = i_l + 1
    Line Input #1, ligne(i_l)
    Wend
    Close #1

    A la sortie vous aurez un tableau qui contiendra toutes les lignes de votre fichier. Vous devez dimensionner un tableau suffisamment grand.

    Y.
    1
  2. Majo88 Messages postés 2 Statut Membre
     
    Merci bien.
    0