Dear Mr.Kid, Wah ada harapan nih, tapi gimana cara share db-nya ms. access ? kalo excel bisa pake share workbook
Regards, Heru Safrudin ----- Original Message ----- From: Mr. Kid To: [email protected] Sent: Friday, January 04, 2013 3:42 PM Subject: Re: [belajar-excel] Koleksi hasil query Bisa dengan kondisi : 1. db di share 2. excel yang digunakan adalah copy-an (bukan 1 file di share) Wassalam, Kid. 2013/1/4 Heru Safrudin <[email protected]> Waw cantik sekali... Thanks Oh ya misalkan saya bikin aplikasi di excel yg dipakai beberapa user, bisakah beberapa user mengupdate data yg saya simpan di file access (mdb) sekaligus secara bersamaan ? Kalau nggak bisa adakah trik untuk mengakali ? Pada tanggal 04/01/13, Mr. Kid [email protected]> menulis: > Hai Heru, > > 1. Jika ingin copy ke range tertentu seluruh hasil open recordset, gunakan > method CopyFromRecordset >>> misal akan di salin mulai baris 7 kolom A > sheets("nama sheet tujuan").range("a7").copyfromrecordset rs 'rs > adalah variabel record set yang sudah berisi dataset hasil query > > 2. Jika ingin loop setiap data >>> usai open recordset > > rs.movefirst > do while not rs.eof > 'proses disini > rs.movenext > loop > > Wassalam, > Kid. > > 2013/1/4 Heru Safrudin [email protected]> > >> ** >> >> >> Dear Mr Kid >> >> Menampilkan data di Tabel1 yang tidak ada di Tabel2 atas petunjuk Mr. >> Kid Alhamdulillah udah berhasil. Nah sekarang bagaimana menampilkan >> koleksi hasil query berikut ini menggunakan For each .... >> >> ConnectDB >> RS.Open "SELECT P2.JOB FROM P2 P2 LEFT OUTER JOIN P3 P3 ON P2.JOB = >> P3.JOB WHERE (P3.JOB Is Null)", CON, adOpenKeyset, adLockOptimistic >> For each data ................ >> MsgBox data >> Next >> RS.Close >> DisconnectDB >> >> -- >> Regards, >> >> Heru Safrudin >> >> Pak Heru, >> >> Kedua tabel terpisah loh ya, bukan jadi 2 kolom berjejer demikian, >> kecuali jika definisi tabel dalam query didefinisikan dengan detil >> mengikuti kolomnya. >> Coba pelajari SQL tentang LEFT OUTER JOIN clause dan WHERE clause. >> Kira-kira bunyinya : >> SELECT dt1.kolom1 >> FROM Table1 AS dt1 >> LEFT OUTER JOIN Table2 AS dt2 >> ON dt1.kolom1=dt2.kolom1 >> WHERE dt2.kolom1 IS NULL >> >> Wassalam, >> Kid. >> >> > -- Regards, Heru Safrudin
