Variavle With ActiveSheet.QueryTables.Add

Bonjour,

voici mon souci :
je veux importer des données d'un fichier .CSV
le string du fichier est dans une variable

(exemple)

Variable1 = "\\55.5.41.55\toto\machin.csv"

la commande d'origine sans variable serait (et fonctionne)

With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;F:\\55.5.41.55\toto\machin.csv", _
Destination:=Range("A1")) With ActiveSheet.QueryTables.Add(Connection:= _
"TEXT;F:\Systeme d'Information\Indicateurs DPS\2010\M6\ADossiersDPSBdx.csv", _
Destination:=Range("A1"))

je veux remplacer \\55.5.41.55\toto\machin.csv par Variable1 et çà ne fonctionne pas

MERCI à tous ceux qui vont pouvoir m'apporter leur aide

Jean-Paul