Dear mas Slamet, >> Listbox pada userform menampilkan data-data dari Ms Access. berarti sudah ada koneksi ke ms access, disertai recordset nya. bearti yang ditampilkan di listbox adalah record dalam recordset.
Bagaimana bila recordset ditampilkan pada datagrid control ? Kalau di excel, maka dibutuhkan penambahan component control dengan klik kanan control toolbox, pilih additional control, cari Microsoft DataGrid bla..bla , tapi yang jelas filenya msdatgrd.ocx, bila belum punya file ini, download dari microsoft downloads. Bisa juga diakses melalui penambahan reference. Jika tidak ada pada list yang ada, browse dan cari file tersebut di folder drive:\windows\system32. baris kode untuk setting recordset ke datagrid : 'nama datagrid control := DataGrid1 'nama object recordset := rs 'setting bound datagrid set DataGrid1 = rs Bila koneksi dan recordset ke access menggunakan control ADODC, dan nama control adodc adalah Adodc1, maka gunakan: set DataGrid1 = Adodc1 Control Adodc harus diset connection string seperti adodb.connection dan set recordset sama dengan setting ado.recordset, dan gunakan query untuk ambil data atau pilih tabel mana dan keysetnya apa. Bila dilakukan dengan coding maka bisa dibuat luwes, bisa ganti-ganti query atau bahkan koneksinya. >> Gimana sih caranya membuat header pada listbox di userforn dengan kondisi header diambil dari Fieldname pada sebuah tabel dari Ms Access. Jika tetap ingin menggunakan ini, maka bisa menggunakan referensi msadox.dll (ms ado ext. ....) lalu setelah connect ke-db baca schema dan catalog, ambil masukkan ke listbox. Atau menggunakan DAO, reference := ms dao 3.51 atau 3.6 (dao350.dll atau dao360.dll) Open database, open tabledef, baca table def, ambil dan masukkan ke listbox Apapun yang digunakan untuk mengambil table fieldname, tetap sebisa mungkin gunakan ado untuk akses record datanya. Selamat mencoba, kalau tidak salah interpretasi masalahnya. Kid 2009/4/1 Slamet Harto <[email protected]> > Dear Master, > > Gimana sih caranya membuat header pada listbox di userforn dengan > kondisi header diambil dari Fieldname pada sebuah tabel dari Ms > Access. > Listbox pada userform menampilkan data-data dari Ms Access. > Selama ini saya selalu menggunakan trik dengan membuat listbox > terpisah lalu mengambil variabel pada sheet tertentu yang > disembunyikan, akan ttp jika data listbox yang menampilkan record2 > dari tabel access telah melebihi batas di form, maka listbox terpisah > tadi tidak ikut bergerak /scrool karena keterbatasan layout pada > userform. > > Jika berkenan, mohon bantuan mengirimkan sample workbooknya. > sebelum dan sesudahnya terimakasih. > Wassalam > >
