Solved

VB.Net - Excel Adding Worksheet Causing Error

Posted on 2013-12-13
3
517 Views
Last Modified: 2013-12-13
Good Day Experts!

I have a very odd happening in my little program here. Currently I am making 3 tabs for my Excel output.  I am trying to add a fourth one and it says you are outta luck...actually "invalid Index".  

Here is how I am doing it:

Dim oXL As Excel.Application
Dim oWB As Excel.Workbook
Dim oSheet As Excel.Worksheet
Dim oSheet2 As Excel.Worksheet
Dim oSheet3 As Excel.Worksheet
Dim oSheet4 As Excel.Worksheet

oWB = oXL.Workbooks.Add
oSheet = oWB.ActiveSheet
oSheet.Name = "Velocity"
oSheet2 = oWB.Worksheets(2)
oSheet2.Name = "Paradox"
oSheet3 = oWB.Worksheets(3)
oSheet3.Name = "Total"
oSheet4 = oWB.Worksheets(4)
oSheet4.Name = "5 Velocity Simplified"

It has started erroring when I added the above 2 lines for oSheet4.  When I comment those 2 lines it will not error!!!

Is there some limit or am I doing it wrong you think?

Thanks,
jimbo99999
0
Comment
Question by:Jimbo99999
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
3 Comments
 
LVL 51

Accepted Solution

by:
Rgonzo1971 earned 500 total points
ID: 39716785
Hi

3 Sheets is the initial default

First add another sheet

oWB.Sheets.Add After:=oWB.Sheets(oWB.Sheets.Count)

Open in new window

Or use before adding wbk
oXL.SheetsInNewWorkbook = 4

Open in new window

Regards
0
 

Author Closing Comment

by:Jimbo99999
ID: 39716825
That is so cool...I did not know that! Another excellent tip for the knowledge base.

Thanks,
jimbo99999
0
 
LVL 40
ID: 39718009
Be careful. 3 sheets is the default, but it can be changed in Excel Options, so you cannot always count on that value. On my system, the initial count is 1.

You should check oWB.Sheets.Count first, and then act accordingly. You might need to add more than one sheet is the initial count is less than 3, or remove extra sheets if the initial count is more than 4 and you do not want more than 4 sheets in the Workbook.
0

Featured Post

Instantly Create Instructional Tutorials

Contextual Guidance at the moment of need helps your employees adopt to new software or processes instantly. Boost knowledge retention and employee engagement step-by-step with one easy solution.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Well, all of us have seen the multiple EXCEL.EXE's in task manager that won't die even if you call the .close, .dispose methods. Try this method to kill any excels in memory. You can copy the kill function to create a check function and replace the …
It’s quite interesting for me as I worked with Excel using vb.net for some time. Here are some topics which I know want to share with others whom this might help. First of all if you are working with Excel then you need to Download the Following …
There's a multitude of different network monitoring solutions out there, and you're probably wondering what makes NetCrunch so special. It's completely agentless, but does let you create an agent, if you desire. It offers powerful scalability …
Michael from AdRem Software outlines event notifications and Automatic Corrective Actions in network monitoring. Automatic Corrective Actions are scripts, which can automatically run upon discovery of a certain undesirable condition in your network.…

724 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question