Extracting Data from Excel Cells

[bjotorres]

How do I grab data from a particular cell in Excel to a text file using VBScript?

[roxer]

hi, bjotorres
Here is example of code how to Read From Excel File.
Here is example of code how to Write to a File.
How to work with Microsoft Excel Objects you can read here.

Hope this will help you

[bfakruddin]

Code:

Function excel()
dim xl

set xl=createobject("excel.application")
xl.visible=true
xl.workbooks.open "path of file .xls"
xl.sheets("sheetid").select

excel=xl.cells(row,column).value
print excel

xl.activeworkbook.save
xl.quit
set xl=nothing
End Function

Call excel()
msgbox excel

Function TextFile(excel)
dim fso,fs

set fso=createobject("scripting.filesystemobject")
set fs=fso.createtextfile("path of file.txt",true)

fs.writeline excel

fs.close

set fs=nothing
set fso=nothing
End Function

print excel
Call TextFile(excel)

[nageshpv]

Thanks bfakruddin.