very new guy needing a little help with ExcelWriteCell

[RickB75]

Guys, I'm very, very new to scripting and I need a little help from the experts. I am writing a simple script to find a specific HTML tag on a webpage and Write the inner text to a excel spreadsheet. My script does this but, it keeps looping through and writes the inner text in the entire first column and keeps looping. I need it to write a cell then loop and find the next tag and write that content into a different cell and keep looping through until the end of the page. This is what I have so far. I commented out the message box, but it works pretty good. Once it grabs the inner text, it displays in a message box, I click "OK" and it loops through again and finds the next html tag and so on.

include <IE.au3>

#Include <Excel.au3>

$oIE = _IECreate ("C:\site\changes.html")

$oExcel = _ExcelBookNew()

$HElements = _IETagNameGetCollection($oIE, "H2")

$EMElements = _IETagNameGetCollection($oIE, "EM")

For $HElement In $HElements

_ExcelWriteCell($oExcel,$HElement.innerText,"A:A")

;MsgBox(0, "Element Info", "Tagname: " & $HElement.tagname & @CR & "innerText: " & $HElement.innerText)

Next

Any help you guys can offer is greatly appreciated!!

[water]

You need a counter to define the row where you want to write the content and which is incremented for the next loop.

#include <IE.au3>
#Include <Excel.au3>

$oIE = _IECreate ("C:sitechanges.html")
$oExcel = _ExcelBookNew()
$HElements = _IETagNameGetCollection($oIE, "H2")
$EMElements = _IETagNameGetCollection($oIE, "EM")
$iCounter = 1
For $HElement In $HElements
    _ExcelWriteCell($oExcel,$HElement.innerText,"A" & $iCounter)
    $iCounter = $iCounter + 1
Next

Edited October 23, 2012 by water

[RickB75]

Thank you for your help Water! That works perfect. You help is very much greatly appriciated!!

[water]

Glad to be of service