Importer données fichier CSV dans un tableau VBA

comment importer les données d'un fichier csv dans une variable tableau?

je m'explique :

mon fichier CSV de 100000 lignes délimité par des ";" est composé d'une multitude de données textes et numériques que je souhaite intégrées dans une variable tableau. Après avoir appliqué la fonction split à chacune de ces lignes, j'aimerai pouvoir traiter ce tableau pour le modifier.

Voici la méthode que j'ai utilisé :

Sub import()

Dim Conn As ADODB.Connection

Dim Rst As ADODB.Recordset

Dim Fichier As String

Dim Chemin As String

Dim rSQL As String

Dim tbl() As Variant

Dim i As Integer

Chemin = "C:"

Fichier = "nomfichier"

'Mise en place de la connexion avec le fichier

Set Conn = New ADODB.Connection

Conn = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & Chemin & ";Extended Properties=""text;HDR=no;FMT=Delimited(;)"""

Conn.Open

rSQL = "SELECT * FROM [" & Fichier & ".CSV]"

Set Rst = New ADODB.Recordset

Set Rst = Conn.Execute(rSQL)

tbl = Rst.GetRows

For i = 0 To UBound(tbl, 2)

tbl(0, i) = Split(tbl(0, i), ";")

Next

Conn.Close

End Sub

ceci fonctionne mais la variable tableau est un variant et non une variable string.

merci d'avance pour votre réponse

Bonjour Jocelyncls,

En quoi le fait que les données de tbl soit de type Variant et pas String te gène?