Hello Jim,
It seems you need to enumerate the list of projects inside solution folder.
Once you have a solution folder with items located within that folder, you
can use the folder as a Project object to locate an item contained within
it.
For example, suppose you have a solution folder with a project loaded into
it. The following macro finds the Project for the solution folder and then
obtains the collection of ProjectItems for the solution folder. Even though
a project within a solution folder is a project, it is still an item, and
so the solution folder allows you to get to a list of ProjectItem objects
by using the ProjectItems property. Once you have this ProjectItem object,
you can call the Object property to retrieve the object specific to that
project item node, which is a project.
Sub EnumProject()
For Each project As Project In DTE.Solution.Projects
If (project.Kind =
EnvDTE80.ProjectKinds.vsProjectKindSolutionFolder) Then
For Each projItem As ProjectItem In project.ProjectItems
Dim containedProject As Project = projItem.Object
MsgBox(containedProject.Name)
Next
End If
Next
End Sub
Please try the above code and let me know if you have any more concern. We
are glad to assist you.
Have a great day,
Best regards,
Wen Yuan
Microsoft Online Community Support
==================================================
This posting is provided "AS IS" with no warranties, and confers no rights.
Jim Hudson - 25 Feb 2008 17:49 GMT
Thanks, Wen Yuan! I had guessed nearly the code you show below, except I
left out the ".Object" from:
Dim containedProject As Project = projItem.Object
Your code worked like a charm. Thank you very much!

Signature
Jim Hudson
> Hello Jim,
>
[quoted text clipped - 36 lines]
> ==================================================
> This posting is provided "AS IS" with no warranties, and confers no rights.
Wen Yuan Wang [MSFT] - 26 Feb 2008 07:49 GMT
Welcome, Jim.
Have a great day,
Best regards,
Wen Yuan
Microsoft Online Community Support
==================================================
This posting is provided "AS IS" with no warranties, and confers no rights.