Bonjour,
j'ai un problème pour importer des données dans excel.

Si je donne la commande:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
With ActiveSheet.QueryTables.Add(Connection:= "TEXT;C:\Documents and Settings\user\Desktop\9435.txt", Destination:=Range("A1"))
alors tout marche comme il faut.

Mais si je définie une variable avec les paramètres de connexion:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
lieu = "Text;" & ActiveWorkbook.Path & "\" & Range("C12").Value & ".txt"
With ActiveSheet.QueryTables.Add(Connection:=lieu, Destination:=Range("B1"))
Il faut spécifier que le workbook est placé dans le même dossier que le fichier à ouvrir et que la numéro de fichier est lu dans une case Excel.

Merci pour vous commentaires.