VB ASP.Net открыть DataGridView в Excel - PullRequest
0 голосов
/ 10 января 2012

Я пытаюсь экспортировать таблицу данных в Excel и открыть электронную таблицу Excel (не СОХРАНИТЬ рабочую таблицу). Вот как далеко я продвинулась ...

Заранее спасибо!

Public Sub ExcelRpt (ByVal DgvName As GridView, ByVal url As String)

    Dim xlApp As Microsoft.Office.Interop.Excel.Application
    Dim xlWorkBook As Microsoft.Office.Interop.Excel.Workbook
    Dim xlWorkSheet As Microsoft.Office.Interop.Excel.Worksheet
    Dim misValue As Object = System.Reflection.Missing.Value
    Dim i As Integer
    Dim j As Integer
    xlApp = New Microsoft.Office.Interop.Excel.Application
    xlWorkBook = xlApp.Workbooks.Add(misValue)
    xlWorkSheet = CType(xlWorkBook.Sheets(1), Worksheet)

    For i = 0 To DgvName.Rows.Count - 2
        For j = 0 To DgvName.Columns.Count - 1
            For k As Integer = 1 To DgvName.Columns.Count

                xlWorkSheet.Cells(1, k) = DgvName.Columns(k - 1).HeaderText
                xlWorkSheet.Cells(i + 2, j + 1) = DgvName.Columns(j, i).Value.ToString()

            Next
        Next
    Next

НЕОБХОДИМ НЕКОТОРЫЙ КОД ЗДЕСЬ !!!!

    releaseObject(xlApp)
    releaseObject(xlWorkBook)
    releaseObject(xlWorkSheet)

End Sub

1 Ответ

0 голосов
/ 10 января 2012

Если вы посмотрите пример на этом сайте: http://vb.net -informations.com / excel-2007 / vb.net_excel_2007_open_file.htm

это должно ответить на ваш вопрос.

...