How to get the spreedsheet Names using vb.net

Question

0.00/5 (No votes)

See more:

Hi friends, I want to get the sheet names of excel or any other file using vb.net . I wrote

code here is

VB

Dim excel As String = frmImportFormBSurveyedData.txtFilePath.Text Dim xl As New Excel.Application Dim xlsheet As Excel.Worksheet Dim xlwbook As Excel.Workbook xlwbook = xl.Workbooks.Open(excel) xlsheet = xlwbook.Sheets.Item(1) For Each sht In xlwbook.Worksheets lsbSheetName.Items.Add(sht.Name) Next xl.ActiveWorkbook.Close(False, Excel) xl.Quit() xlwbook = Nothing xl = Nothing

It's working file but any other way to get the sheet names using vb.net

please anyone help me.

advanced thanks....

Posted 24-Jul-13 20:49pm

CH Guravaiah

Add a Solution

2 solutions

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard MacCutchan · Answer 1 · 2013-07-24T22:12:00

Solution 1

Reading and Writing Excel using OLEDB[^] explains how to do it. The article is C# but it should be easy to translate to VB.NET.

Posted 24-Jul-13 22:12pm

Richard MacCutchan

TANMAY N · Answer 2 · 2014-12-15T22:46:00

tyr This code in vb.net

<pre lang="vb">Private Sub GetExcelSheetNames(ByVal fileName As String)
    Dim strconn As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & 
          fileName & ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";"
    Dim conn As New OleDbConnection(strconn)

    conn.Open()

    Dim dtSheets As DataTable = 
              conn.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing)
    Dim listSheet As New List(Of String)
    Dim drSheet As DataRow

    For Each drSheet In dtSheets.Rows
        listSheet.Add(drSheet("TABLE_NAME").ToString())
    Next

    //show sheetname in textbox where multiline is true
    For Each sheet As String In listSheet
        TextBox1.Text = TextBox1.Text & sheet & vbNewLine
    Next

    conn.Close()

End Sub