从datagridview中导出Excel

最新推荐文章于 2023-09-04 17:27:22 发布

lixueru0819

最新推荐文章于 2023-09-04 17:27:22 发布

阅读量751

点赞数 1

CC 4.0 BY-SA版权

本文链接：https://blog.csdn.net/lixueru0819/article/details/6785896

.net 专栏收录该内容

9 篇文章

订阅专栏

本文介绍了一种使用DataGridView导出数据到Excel的方法。通过设置DataGridView的属性并引用Microsoft.Office.Interop.Excel，可以轻松实现将DataGridView中的数据及字段名批量导出至Excel文件中。

摘要生成于 C知道，由 DeepSeek-R1 满血版支持，前往体验 >

在导出之前要先进行一些设置：

将datagridview的allowUsersToAddRows属性设置为false

添加引用项目——添加引用——.net——Microsoft .Office.Interop.Excel

导出Excel：

      '要先添加引用才能用到 Microsoft.Office.Interop.Excel.Application()
        Dim MyExcel As New Microsoft.Office.Interop.Excel.Application()
        MyExcel.Application.Workbooks.Add(True)
        MyExcel.Visible = True

        '将datagridview中的字段名导出
        Dim m As Integer
        For m = 0 To DataGridView1.ColumnCount - 1
               MyExcel.Cells(1, m + 1) = Me.DataGridView1.Columns(m).HeaderText
        Next m

        '往excel表里添加数据
        Dim i As Integer
        For i = 0 To DataGridView1.RowCount - 1
              Dim j As Integer
              For j = 0 To DataGridView1.ColumnCount - 1
                    If Me.DataGridView1(j, i).Value Is System.DBNull.Value Then

                           MyExcel.Cells(i + 2, j + 1) = ""
                    Else
                           MyExcel.Cells(i + 2, j + 1) = DataGridView1(j, i).Value.ToString

                    End If
              Next j
        Next i