Besides you may try this as you have not properly set the objects in your
code.

Dim LCV as Excel.Application
Dim oBook As Excel.Workbook
Dim oSheet1 As Excel.Worksheet

SET LCV = CreateObject("Excel.Application")
SET oBook = LCV.Workbooks.add
SET oSheet1 = oBook.Sheets.Add
oSheet1.Name = "Portfolio"


Regards,
Shailesh Shah
http://in.geocities.com/shahshaileshs/
(Excel Add-ins Page)
If You Can't Excel with Talent, Triumph with Effort.



"NewToVB" wrote in message
...
I'm having trouble changing the names of my worksheets in my new workbook,
can someone help? Here is the code that I have. I'm using Visual Studio
2005, Excel 2007 and VB, here is some of the code I have. Thanks!

Dim LCV = New Excel._ExcelApplication
LCV = CreateObject("Excel.Application")
Dim oBook As Excel.Workbook
Dim oBooks As Excel.Workbooks
Dim oSheets As Excel.Sheets
Dim oSheet1 As Excel.Worksheet

oBooks = LCV.Workbooks
oBook = oBooks.Add()
oSheets = oBook.Worksheets <----I get an error saying COM
unhandled
oSheet1 = oSheets.Add
oSheet1.Name = "Portfolio"


I know it already has 3 sheets when you create a new workbook, but how do
you change those names?