Reading an Excel in VBScript

Below is a piece of code which can be used to read excel sheet and the values in the row or column.
Option Explicit
Dim myExcel,strExcelPath,objSheet
Dim intRow,strRow2Col1,strRow2Col2
Set myExcel = CreateObject("Excel.Application")
strExcelPath = "C:\Book2.xls"
myExcel.WorkBooks.Open strExcelPath
Set objSheet = myExcel.ActiveWorkbook.Worksheets(1)
'Assuming that the first row will contain the name of the column
intRow = 2
Do While objSheet.Cells(intRow, 1).Value <> ""
    strRow2Col1 = objSheet.Cells(intRow, 1).Value
    strRow2Col2 = objSheet.Cells(intRow, 2).Value
'Increment the control to the next row
    intRow = intRow + 1
Loop
myExcel.ActiveWorkbook.Close
myExcel.Application.Quit

Comments

Post a Comment

Your comments will be reviewed and then published !

Popular posts from this blog

The 3 qualities that will always help you become better at almost anything…

Image
Have we ever noticed how excited we are when we start anything? But it’s a sad fact that 70% of people abandon what they have started with so much energy and love. It could be as small as building a hobby or starting a pet project or even an activity or a side learning we started. “ Well begun is half done .” Aristotle did say this but we are judged for how we have finished something. You separate yourself fro m  the masses when you choose to give that task a finish.  The first quality is finishing off what you started and it helps develop mental stamina or willpower.   It builds confidence and inculcates as a habit in a long run. You don’t need to sign up for the mammoth activity to build this habit, even finishing mundane day-to-day routine tasks will help. Diligence — the quality of working carefully and with a lot of effort Diligence is a quality that almost never will get unnoticed. It’s one of the underlying traits of great works or success. The key to mediocrity on the o
Read More »

How to install Android Emulator on Windows

Image
As part of my testing work, I am currently working on using webdriver to test on Android. So I had to install Android Emulator on Windows 7. Below are the sequential steps and I hope it will ease some pain on getting Android emulator on your Windows 7 box. Download the installer from http://developer.android.com/sdk/index.html Install it to a location (like: C:\Program Files\Android) Launch “SDK Manager.exe” It will launch a “Android SDK and AVD Manager”. By default “Installed packages” will be highlighted. On the pop up “Choose Packages to Install”, there will be some packages selected already. Go ahead with the “Install”. 4.    Once it is done, select “Virtual Devices” to create one for you. Click on “New” and enter some name. Target as “Android 2.2 – API Level 8”. Select Size as “512” and “ Built-in ” to be “WVGA854” and click on “ Create AVD ”. 5. Once done select the Virtual device you created and click on Start . You can find the “Start” button on the right panel
Read More »

Embracing the Journey: Finding Joy in the Process

Image
 In our fast-paced world, it’s easy to get caught up in chasing our goals. Whether it's a career milestone, a fitness target, or a financial aim, we often fixate on the end result. But recently, I came across a quote by Sal Di Stefano that struck a chord with me: “The man who loves walking will walk further than the man who loves the destination.” Rediscovering the Joy of the Journey This quote reminded me of something profound – the importance of loving the journey, not just the destination. When we enjoy the process itself, we find a deeper, more sustainable source of motivation. This mindset can be a game-changer, not just professionally but personally as well. A Personal Anecdote: My Professional Journey Let me share a bit of my own experience. As a software engineer turned entrepreneur, I initially focused heavily on the end goals: launching the company, acquiring clients, and hitting revenue targets. But over time, I realized that what kept me going during tough times was not
Read More »