Hi Randy,

That looks most promising.

1. What is oCell? it looks like a cell but I am not sure. Do you dim it
earlier?

2. What references do you have other than MS Internet Control?

3. How does the code execute? You open IE, navigate to your address and then
run the code? The Set oForm = oIE.Document.forms(0) sets the forms from the
web page I guess

4. How do you find the names of the oForms in the page? I guess you go in IE
to View/Code and then?

Sorry for all the questions.

Many thanks, again, this can be very helpful.

Antonio


"Randy Harmelink" wrote:

Antonio wrote:
As Paul D mentioned earlier, it is possible to launch IE from within VBA
(Code at the end)

Is it possible to input a username as well?

You just have to be able to find out how to fill in the username. For
example, I have an EXCEL spreadsheet I use to create portfolios on
Yahoo! that fills in the forms iteratively. The routine below is used
to find the FORM on the page, then to fill in each item of the FORM,
then CLICK on the save option of the FORM. It does this until my list
of transactions is at an end. Here's the routine:

Sub YahooAddPortfolioTransactions()
Set oForm = oIE.Document.forms(0)
For Each oCell In Sheets("Yahoo! Portfolio
Transactions").Range("A2:A500")
If oCell.Value = "" Then Exit For
oForm("y").Value = oCell.Offset(0, 0)
oForm("m").Value = oCell.Offset(0, 1) - 1
oForm("d").Value = oCell.Offset(0, 2)
oForm(".act").Value = oCell.Offset(0, 3)
oForm(".sym").Value = oCell.Offset(0, 4)
oForm(".units").Value = oCell.Offset(0, 5)
oForm(".unitprice").Value = oCell.Offset(0, 6)
oForm(".comm").Value = oCell.Offset(0, 7)
oForm(".note").Value = oCell.Offset(0, 8)
oForm(".save2").Click
Do: DoEvents: Loop While oIE.Busy
Do: DoEvents: Loop Until oIE.ReadyState = READYSTATE_COMPLETE
Set oForm = oIE.Document.forms(0)
Next oCell
oForm(".cancel").Click
End Sub