(Visual Studio 2010) How To Import Data From Excel To Datagridview In Visual Basic Net Windows Application – Microsoft Excel 2010
(Visual Studio 2010) How To Import Data From Excel To DataGridView In Visual Basic .Net Windows Application – Microsoft Excel 2010

This Tutorial Shows How To Import Data From Excel To DataGridView In Visual Basic .Net Windows Application.

Visual Basic .Net SOURCE CODE
Dim importExcelToDatagridviewApp As Application Dim importExcelToDatagridviewWorkbook As Workbook Dim importExcelToDatagridviewWorkSheet As Worksheet Dim importExcelToDatagridviewRange As Range Try Dim importExcelToDatagridviewOpenFileDialog As New OpenFileDialog() 'Initial Open Dialog Directory importExcelToDatagridviewOpenFileDialog.InitialDirectory = "C:\Users\Authentic\Desktop" 'Show Only Excel Files When You Click Import Button importExcelToDatagridviewOpenFileDialog.Filter = "Excel Files | *.xls;*.xlsx;*.xlsm" 'Dialog Box Title importExcelToDatagridviewOpenFileDialog.Title = "Select Excel File" Dim Exelrows As Integer If importExcelToDatagridviewOpenFileDialog.ShowDialog() = DialogResult.OK Then importExcelToDatagridviewApp = New Application() importExcelToDatagridviewWorkbook = importExcelToDatagridviewApp.Workbooks.Open(importExcelToDatagridviewOpenFileDialog.FileName) importExcelToDatagridviewWorkSheet = importExcelToDatagridviewWorkbook.Sheets.Item(1) importExcelToDatagridviewRange = importExcelToDatagridviewWorkSheet.UsedRange 'Start From Second Row For Exelrows = 2 To importExcelToDatagridviewRange.Rows.Count 'Getting Image From Image Path Saved In Excel Cell And Converting It To Byte Array Before Displaying It On DatagaGridView Cell. Dim imagePathFromExcelFileToDataGridView As Image = Image.FromFile(importExcelToDatagridviewRange.Cells(Exelrows, 5).Value.ToString()) 'Populationg DataGridView Inside a For Loop DataGridView1.Rows.Add(importExcelToDatagridviewRange.Cells(Exelrows, 1).Value.ToString, importExcelToDatagridviewRange.Cells(Exelrows, 2).Value.ToString, importExcelToDatagridviewRange.Cells(Exelrows, 3).Value.ToString, importExcelToDatagridviewRange.Cells(Exelrows, 4).Value.ToString, importExcelToDatagridviewRange.Cells(Exelrows, 5).Value.ToString, convertImageToByteArray(imagePathFromExcelFileToDataGridView)) Next End If 'importExcelToDatagridviewWorkbook.Close() Catch ex As Exception Finally End Try
