How to retrieve value
I have an excel sheet and i want to add to numbers for a particular article on a particluar date.
for article 1234 i want to add 8 and 0.1 for date 1.
for article 1098 i want to add 7 and 0.9 for date 1 and so on in the same way.....i cant retrieve seprately but iam confuse how to add them as said above....
please help..iam attaching the screenshot of excel sheet....
This is what i have created..
<font class="small">Code:</font><hr /><pre> Set objcon = CreateObject("ADODB.Connection")
objcon.open "DSN = test;"
timing = 0
Set xlapp = CreateObject("Excel.Application")
Set xlworkbook = xlapp.workbooks.open("F:\Docs\demo.xls")
Set xlworksheet = xlworkbook.worksheets(1)
row_num = xlworksheet.UsedRange.rows.count
For i = 2 to 5
dd = trim(xlworksheet.cells(1,i).value)
For j = 2 to row_num step 2
article_id = trim(xlworksheet.cells(j,1).value)
For k = i to row_num
timing = trim(xlworksheet.cells(k,i).value) + timing
qry = "Insert into [tbl_result$] values('"&article_id&"','"&timing& "')"
Set dbconnect = objcon.execute(qry)
While temp = 0
temp = 1
Next </pre><hr />
Please tell me where iam making mistake...
Re: How to retrieve value
Can anyone please help with this one???