Récupérer une valeur d'une base de donnée Lotus

[Syntaxerror]

Bonjour le forum !
J'importe des données d'une base de donnée Lotus (fichier .nsf) dans un classeur classeur Excel.
Je voudrais afficher certaines valeur dans un userform. Malheureusement, chaîne de caractère dans la base de donnée sont certainement trop longue pour une "pauvre" cellule XL. C'est pourquoi je voudrais récupérer la valeur dans un variable tampon. J'ai trouvé ce code sur le Wiki Excel Download et compte m'en inspirer.

Sub ImportTableAccess()
Dim cn As ADODB.Connection
Dim Rs As ADODB.Recordset
Dim intColIndex As Integer, i As Integer, N As Integer
Dim Fichier As String, TableName As String

Fichier = ThisWorkbook.Path & "\maBase_V01.mdb"
TableName = "Table1"

Set cn = New ADODB.Connection
cn.Open "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & _
   Fichier & ";"
Set Rs = New ADODB.Recordset
    
With Rs
.ActiveConnection = cn
.Open "SELECT * FROM " & TableName, , adOpenStatic, adLockOptimistic, adCmdText
End With

UserForm1.ListBox1.ColumnCount = Rs.Fields.Count
'UserForm1.Label6.Caption = "Résultat requete = " & Rs.RecordCount
'...

Malheureusement je ne sais pas par quoi remplacer Microsoft.Jet.OLEDB.4.0

Quelqu'un pourrait il m'éclairer ?
Merci déjà de m'avoir lu