VB.Net dataGridViewのデータをexcelにエクスポート
今日は機械室の料金システムを作ってレポートの印刷部分を作りました.
DataGridViewのデータをexcelにエクスポートするとき、ネット上で関連する内容を探しましたが、個人的にはあまりよくなく、複雑なものもあります.
次に、dataGridViewデータをexcelに簡単に実装します.
もちろん、まず参照を追加します:Microsoft.Office.Interop.Excel
DataGridViewのデータをexcelにエクスポートするとき、ネット上で関連する内容を探しましたが、個人的にはあまりよくなく、複雑なものもあります.
次に、dataGridViewデータをexcelに簡単に実装します.
もちろん、まず参照を追加します:Microsoft.Office.Interop.Excel
Dim MyExcel As New Microsoft.Office.Interop.Excel.Application()
MyExcel.Application.Workbooks.Add()
MyExcel.Visible = True
'
Dim Cols As Integer
For Cols = 1 To DataGridView1.Columns.Count
MyExcel.Cells(1, Cols) = DataGridView1.Columns(Cols - 1).HeaderText
Next
' 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