Membaca Dan Menampilkan Data Dari File Excel di VB 6

Jika kita ingin menampilkan data dari file excel ke MsFlexgrid di Visual basic 6 bagaimanakah caranya..? Untuk itu kali ini saya akan berbagi source code untuk membaca dan menampilkan data dari file excel ke dalam grid di vb 6.
Buat sebuah form lalu tambahkan komponen MsFlexgrid,CommandButton,TextBox,CommonDialog dan desain lah seperti gambar berikut ini


Jangan lupa tambahkan referensi Microsoft ActiveX Data Objects 2.xx library seperti gambar ini

Lalu kita buat dulu fungsi untuk membuka file ini (excel-red) pada sebuah modul, koding nya seperti berikut

Lalu pada tombol Open File ketikan koding berikut ini


Jika sudah semua lalu run dan hasilnya seperti gambar berikut ini.


Jika mengininkan coding lengkapnya silahkan download source codenya. semoga bermanfaat






Keywords: 
Membaca Dan Menampilkan Data Dari File Excel di VB 6,membaca file excel di vb 6, menampilkan file excel di vb 6,membaca data dari file excel di vb 6, menampilkan data file excel di vb 6, membaca file excel dan menampilkan datanya di vb 6, Menampilkan file excel di grid,menampilkan data file excel di grid,Membaca file Excel dan Menampilkan datanya,Membuka dan Membaca File Excell Dari VB 6.0,Mengolah data Ms. Excel dengan VB 6,Menampilkan data excel pada datagrid,Membaca Data Excel dan Menyimpannya ke Database,

6 comments:

  1. AnonymousJune 25, 2015 at 10:05 AM

    gan saya masih error mohon bantuannya.
    saya masih pemula :) muncul error sub or function not defined

    ReplyDelete
  2. Ahmad RamliDecember 15, 2015 at 11:51 PM

    Gan.. klo mw menampilkn data berdasarkn pencarian nama gmn???

    ReplyDelete
  3. UnknownMarch 31, 2016 at 9:47 AM

    gan...mohon bantuannya,misalnya saya mempunyaia 4 file (bisa lebih) dlm format excel, katakanlah file INDO, INGG, MAT, IPA yang masing-masing file berisi kolom : No.Induk, Nama, Tgl Lahir, dan Nilai. Keempat file tersebut datanya sama kecuali Nilainya saja....Nah bagaimana menggabungkan ke empat file tersebut menjadi satu file saja dengan Kolom : No Induk, Nama, Tgl Lahir, Nilai INDO, Nilai INGG, Nilai Mat dan Nilai IPA, Jumlah dan Rata-Rata .... ditunggu bantuannya gan, sy masih pemula nih, bantuan bisa dikirim ke email : udinsahnudin99@gmail.com

    ReplyDelete
  4. UnknownApril 8, 2016 at 3:10 AM

    gan saat saya coba ada salah di perintah ini gimna ya solusinya?
    rsExcel As ADODB.Recordset

    ReplyDelete
    Replies
    1. hadiasokaApril 8, 2016 at 10:49 AM

      coba klik menu project lalu klik references kemudian beri tanda centang "Microsoft ActiveX Data Objects 2.x Library" pilih salah satu dari 2.0 s.d 2.8 semoga berhasil

      Delete