web query based on cell value

[daveB]

Is it possible to run a webquery based on a cell value in
VBA. In other words I want to substitute "www.myaddress"
in the code below with info that a user would input into
cell A1.

With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www.mywebaddress" _
, Destination:=Range("B2"))

I am new to VBA.

Thanks

 

[Don Guillett]

try
myadd="whatever"
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www."&myadd&" _
, Destination:=Range("B2"))

 

[Guest]

Thanks Don, Worked great!

-----Original Message-----
try
myadd="whatever"
With ActiveSheet.QueryTables.Add(Connection:= _
"URL;http://www."&myadd&" _
, Destination:=Range("B2"))


--
Don Guillett
SalesAid Software
(e-mail address removed)



.

 

[Don Guillett]

glad to help