For each ... Next Question

[PS]

Hi,

In Excel VBA, I can read Excel add-in member name through this code ...

--------------
Dim e As Excel.AddIn
For Each e In Application.AddIns
Debug.Print e.Name
Next
--------------

But in VB.Net, It results in Error.

--------------
Imports Excel = Microsoft.Office.Interop.Excel

Module Module1
Sub Main()
Dim xl As New Excel.Application
xl.Workbooks.Add()
xl.Visible = True
Dim e As Excel.AddIn
For Each e In xl.AddIns ' <<---Error
Console.WriteLine(e.Name)
Next
Console.ReadLine()
End Sub
End Module
----------------

Of course, I can acqure right results by this code ...

---------------
Dim i As Integer
For i = 1 To xl.AddIns.Count
Console.WriteLine(xl.AddIns(i).Name)
Next
---------------
How can it be done by [for each] [Next] routine?

[SStory]

hmmm. this is interesting to me. I want to know the answer also.
One note. Since e is the variable name for one of the 2 param passed to
every event in vb I would refrain from using it for any other purpose.

Also, what is the error that might help us...??

Shane

"PS" <ps*****@hotmail.com> wrote in message
news:O3**************@tk2msftngp13.phx.gbl...

Hi,

In Excel VBA, I can read Excel add-in member name through this code ...

--------------
Dim e As Excel.AddIn
For Each e In Application.AddIns
Debug.Print e.Name
Next
--------------

But in VB.Net, It results in Error.

--------------
Imports Excel = Microsoft.Office.Interop.Excel

Module Module1
Sub Main()
Dim xl As New Excel.Application
xl.Workbooks.Add()
xl.Visible = True
Dim e As Excel.AddIn
For Each e In xl.AddIns ' <<---Error
Console.WriteLine(e.Name)
Next
Console.ReadLine()
End Sub
End Module
----------------

Of course, I can acqure right results by this code ...

---------------
Dim i As Integer
For i = 1 To xl.AddIns.Count
Console.WriteLine(xl.AddIns(i).Name)
Next
---------------
How can it be done by [for each] [Next] routine?