This example opens the HTML project in the active workbook in source view.
AppActiveWorkbook.HTMLProject.Open _
(msoHTMLProjectOpenSourceView)
This example opens the first HTML project item in the active workbook in text view.
ActiveWorkbook.HTMLProject.HTMLProjectItems _
Item(1).Open (msoHTMLProjectOpenTextView)