If and go to

[asdzxc]

If H1 is empty, go to
With Worksheets("Sheet1").QueryTables.Add(Connection:= _
"URL;http://ichart.finance.yahoo.com/table.csv?s=" & _
Worksheets("Sheet1").Range("J1").Value & "&a=10&b=13&c=2011&d=06&e=6&f=2013&g=w&ignore=.xlsx" _
, Destination:=Worksheets("Sheet1").Range("$A$1"))
If not empty, go to
With Worksheets("Sheet1").QueryTables.Add(Connection:= _
"URL;http://ichart.finance.yahoo.com/table.csv?s=" & _
Worksheets("Sheet1").Range("J1").Value & "&a=10&b=13&c=2011&d=06&e=6&f=2013&g=m&ignore=.xlsx" _
, Destination:=Worksheets("Sheet1").Range("$A$1"))
Plse add code.

Please Login or Register  to view this content.

[Bob Phillips]

Please Login or Register  to view this content.

[asdzxc]

Thank you for your code.
In J1, put ^dji
at .Name = _
compile error:
Invalid or unqualified reference

If Range("H1").Value = "" Then

With Worksheets("Sheet1").QueryTables.Add(Connection:= _
"URL;http://ichart.finance.yahoo.com/table.csv?s=" & _
Worksheets("Sheet1").Range("J1").Value & "&a=10&b=13&c=2011&d=06&e=6&f=2013&g=w&ignore=.xlsx" _
, Destination:=Worksheets("Sheet1").Range("$A$1"))
else



With Worksheets("Sheet1").QueryTables.Add(Connection:= _
"URL;http://ichart.finance.yahoo.com/table.csv?s=" & _
Worksheets("Sheet1").Range("J1").Value & "&a=10&b=13&c=2011&d=06&e=6&f=2013&g=m&ignore=.xlsx" _
, Destination:=Worksheets("Sheet1").Range("$A$1"))
End If[/code][/QUOTE]

[Bob Phillips]

Didn't add End With to your codes

Please Login or Register  to view this content.

[asdzxc]

Thank you for your codes.
compile error at (.Name = _):
Invalid or ungualified reference

Please Login or Register  to view this content.

[/QUOTE]
Thank you for your codes.
compile error:
Invalid or ungualified reference

Please Login or Register  to view this content.

[Bob Phillips]

So you are having a problem with code that wasn't in the code that I gave you? Therefor you must have added, you must have had a reason to add it, you must have got it from somewhere; so perhaps you could bother yourself to tell us what you are up and not assume that we can read your mind.