View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
R.VENKATARAMAN R.VENKATARAMAN is offline
external usenet poster
 
Posts: 110
Default macro in excel 2000 vs excel 2002

I have read an interesting thread in
http://groups.google.com/group/micro...ing/browse_frm
/thread/b5e678e531ed5c4c/0670a92b4f4ea81d?lnk=st&q=VBE+EXCEL+2000+AND+EXCEL +
2002&rnum=1#0670a92b4f4ea81d

wherein Jim reach has explained the problem of running a macro prepared in
excell 2000 in office xp I had similar problem
column B has stock symbols(column A is the corresponding full name)
in column C(col B cell.offset(0,1)) I am downloading stock data from a
webpage which has the stock symbol as part of the url
so I introduced a variable in the url so that variable will be corresponding
stock symbol and one by one in each row the stock data can be downloaded
the url inthe code statement is
=============
Set source = Worksheets("sheet1").Range("B5")
do(in range from B5 down to the last entry in col B)

sNWind = "URL;http://in.finance.yahoo.com/d/quotes.csv?s=" & source &
"&m=b&f=sl1d1t1c1ohgv&e=.csv"

Set oQryTable = Worksheets("sheet1").QueryTables.Add( _
sNWind & ";", source.Offset(0, 1))
oQryTable.Refresh False
set source=source.offset(1,0)
loop(until source is blank
================
where the source is the variable , source are the successive cells in
column B

this works ok in excel 2000(windows 98SE)

when I use this in excel 2002(XP) as the new data is downloaded the data in
the previous row shifts to the right cell successively

could this be due to some reference problem in excel 2002 vba.
of course I got out ofthe problem by some tortuous and inelegant codes. I
am not happy with this.


an extract of col B is given below (if needed for testsing) B5 onwards.

CMC.NS
DABUR.NS
520022.BO
FINPIPE.NS
526235.BO
MRPL.NS
MTNL.NS
NATIONALU.NS
NAVBARFER.NS
NIITLTD.NS