imports dans Excel avec la querytables

bonjours !!!
je n'arrive pas à parametrer ma commade :

dim wsexcel as excel.worksheets.add
dim wsexcel.name = "..."
with wsexcel.querytables.add(xlquerytype.xltextimport,wsexcel.range("A1"))

quelqu'un à une petite idée?
merci d'avance.