Menampilkan data excel pada datagrid dengan VB.net

1.      Buat new project -> windows form -> tulis nama project

sesuai dengan keinginan brother (open excel)

2.      Tambahkan: 1 button => nama= Open dan 1 datagridview

3.      Add referensi excel ke project dengan click kanan di solusi explorer

Click  Com dan cari Microsoft Excel Librarya  tergantung office yang ada di compi

4.      Click 2x button Open  dan ketik Code Berikut:

' Add table ecxel to datagrid Dim StrCon As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & "***" & ";Extended Properties=Excel 12.0" Dim conn As New System.Data.OleDb.OleDbConnection conn.ConnectionString = StrCon conn.Open() Dim mydataset As New DataSet ' mengambil data sheet xa Dim myData As New OleDb.OleDbDataAdapter("SELECT * FROM [XA$]", StrCon) myData.TableMappings.Add("Table", "XA$") myData.Fill(mydataset) DataGridView1.DataSource = mydataset.Tables(0).DefaultView conn.Close()

         

5.      *** = di isi lokasi dari file excel yang akan di buka misal: D:\book1.exls

6.      SELECT * FROM [XA$] = mengambil data dari sheet yang bernama “XA”

Jika sheet belum di rename kasi di sana sheet1 ,sheet2 ato yg laen!!!!

7.      Tekan  F5  untuk menjalakan program.

 8.  Semoga membantu!!!

Download File (vb)