Problema con la sintaxis

[gonzaloalfaro]

Cómo están foreros? Tengo una duda sobre un procedimiento.

Tengo las rutas en unas celdas de excel y quiero que este comando, obtenido de la grabadora, me permita realizar el query con esta macro. La macro, busca en la web la direccion y descarga cierta info ya que en la ruta solo cambian ciertos valores de manera recursiva.

Dim Ruta As Integer

Ruta =Cells(1,1).Value

With ActiveSheet.QueryTables.Add(Connection:= _

"URL;" & (Ruta) & "" _

, Destination:=Range("$D$1"))

Help y Gracias.