erreur de compatibilité

kakachi

XLDnaute Junior
Bonsoir à tous ,

j'ai un petit problème : c'est une erreur d’exécution 13 : incompatibilité de type

voici le code que j'ai écrit:

Sub importer()
Dim LADATE As String
Sheets("TEMP").Cells.Clear
LADATE = Worksheets("ACCUEIL").Range("K1").Value

With Sheets("TEMP").QueryTables.Add(Connection:="URL;http://www.geny.com/reunions-courses-pmu/_d&" - LADATE - "&" & -"?" - "" _
, Destination:=Sheets("TEMP").Range("$A$1"))



je veux juste changer l'expression " _d2013-10-17?" par la variable " LADATE", pour ne pas avoir a ouvrir le code pour changer la date tous les jours.Malgré plusieurs tentatives, j'ai toujours une erreur de compatibilité

Si vous pouvez m'aider à résoudre ce problème...
je vous dis a très bientot

bonne soirée

Kakachi
 

Statistiques des forums

Discussions
312 775
Messages
2 092 009
Membres
105 148
dernier inscrit
gegre