[VB] Problème de code

Bonjour,

J'utilise une requête SQL pour charger une liste d'éléments. Je voudrais parcourir cette liste d'éléments et créer une ligne par élément dans un document excel qui comporte dans une première colonne son nom et dans une deuxième un autre champ.

Voici le code que j'utilise et qui ne marche pas.
Set testfac = TDConnection.TestFactory

Set myTList = testfac.NewList("SELECT * FROM TEST")

If myTList.count <> 0 Then
PathFile = "U:\Document\Test_Failed_Defects.xls"
Q_deleteFilePath(FilePath)

For Each entry In myDList
Set objFichier = CreateObject("Scripting.FileSystemObject")
Set MyFile = objFichier.CreateTextFile(PathFile, True)
MyFile.WriteLine "Test Name"
MyFile.WriteLine entry.field("TS_NAME")
MyFile.Close
Next
MsgBox "Report Created"
End IF

Existe-t-il quelque chose comme WriteRow? Pouvez vous m'aider?
Merci