Bikin tembikar dari tanah liat
Dibakar api hingga jadi keras
Terimakasih mas Luski saya ucapkan dengan tulus niat
Mudah-mudahan ilmunya terus mengalir deras.

Saya akan terapkan di file access kosong.
nanti laporannya saya berikan ke milis ini.

Harpa ini dipetik pelan
Nyanyian merdu terus terdengar
Jika hati ini sedang riang
Mudah-mudahan semua lancar


Hafrizal





________________________________
Dari: privat access <[email protected]>
Kepada: [email protected]
Terkirim: Jum, 11 Juni, 2010 10:24:44
Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis

  
Buah mangga buah jambu
Metiknya dikebun tetangga
Yuk.. sama2 kita ngerujak aja.. dosanya tanggung bareng - bareng :D

Dear Hafrizal,

Untuk melakukan import otomatis dari excel ke access banyak caranya. Mungkin 
ini salah satunya :

1. Pastikan bahwa fieldname dalam tabel access disamakan dg template di excel

2. Anda bisa melakukan import melalui File/GetExternal/ Import...
Atau bila anda ingin melakukan hal tersebut melalui form, silahkan buat tombol 
di form dg nama cmdimpor

Private Sub cmdimpor_Click( )
DoCmd.ShowToolbar "Form View", acToolbarYes
        CommandBars("Menu Bar"). _
            Controls("File"). _
            Controls("Get External Data"). _
            Controls("Import..."). _
            accDoDefaultAction

End Sub

3. Anda bisa juga membuat DeleteQuery utk menghapus data lama pada tabel yang 
ada, sehingga data dalam tabel selalu baru.. (untuk hal ini tergantung kasusnya 
ya)

Berikut langkahnya :
a. Buat DeleteQuery untuk menghapus data lama :

DELETE Import_Data. *
FROM Import_Data;

b. Buat tombol di form misalnya cmdProses

Private Sub cmdProses_Click( )
On Error GoTo nol

Dim namafile As String
namafile = namafiledanlokasiny a (anda bisa menuliskan nama file lengkap dg 
path nya atau anda bisa juga membuat string untuk menampung variable pathfile)

DoCmd.SetWarnings False
    DoCmd.RunMacro "delDBupld" (sy menggunakan macro delDBupld untuk 
mengeksekuki DeleteQuery)
    DoCmd.TransferSprea dsheet acImport, acSpreadsheetTypeEx cel12, 
"Import_Data", namafile, True
DoCmd.SetWarnings True
MsgBox "Data sudah di Import!", vbInformation, "Informasi"
DoCmd.OpenForm "FRM_HASIL"


nol:
    
End Sub


Salam,

Lusky Kurniawan
http://solusiaccess .com





Pada 11 Juni 2010 07:03, Hafrizal Manna <hafrizal.manna@ yahoo.co. id> menulis:

>
>
>
>
>
>
>
>
>
>
>
>
>
>  >
>
>>
> 
>>      
> 
>Salam pagi.
>
>>Kawan-kawan, mohon bantuannya.
>
>>Ombak putih menerjang pantai
>>Orang gunung melihat dari jauh
>>Bagaimana belajar access d
>
>
>>--- Pada Kam, 10/6/10, Keep spirit Belajar access <keepspirit.belajara 
>>cc...@yahoo. co.id> menulis:
>
>>Dari: Keep spirit Belajar access <keepspirit.belajara cc...@yahoo. co.id>
>>Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis
>>Kepada: belajar-access@ yahoogroups. com
>>Tanggal: Kamis, 10 Juni, 2010, 3:06 AM
>
>>Sangat bisa bpk, sepanjang dalam satu suite office, apapun bisa dilakukan. 
>>Sebagai awal bpk, bisa mengirimkan aplikasi access dan file excel nya. Akan 
>>banyak rekan2 yang siap membantu.
>
>>Salam,
>>~ KSBA | Keep the Spirit of Belajar Access ~
>
>>gunung singgalang dan bukit barisanberjejer
>
>tegak tinggi menjulangniat hati ingin membantu kawan
>
>>apalah
>>daya jika aplikasi access dan excel nya belum dikirimkan 
>
>>wah kok seperti pak menteri TI ya...(just kidding)
>
>>--- Pada Kam, 10/6/10, Hafrizal Manna <hafrizal.manna@ yahoo.co. id> menulis:
>
>>Dari: Hafrizal Manna <hafrizal.manna@ yahoo.co. id>
>>Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis
>>Kepada: belajar-access@ yahoogroups. com
>>Tanggal: Kamis, 10 Juni, 2010, 2:45 AM
>
>>Terimakasih pak KSBA.
>>Mohon dibenarkan bila ada kesalahan pikir saya.
>>Bisakah bila memungkinkan untuk membuat kolom itu di access, trus dari access 
>>ketika diklik maka nama file otomatis akan masuk ke kolom terima_lampiran_ 
>>dari.oh iya.mungkin perlu ditambahkan kolom tanggal_terima_ lampiran.
>>
>kalau kode-kode, adakah yang bisa seperti ini pak :- mengetahui nama-nama file 
>excel di folder kiriman.- mengimpor isi file itu ke tabel di ms access- 
>memindahkan file excel yang sudah impor ke folder sdh_diproses
>>nantinya lampiran lain akan saya masukkan ke folder kiriman tersebut.dan 
>>proses bisa dilakukan kembali.
>>kode ini dijalankan dari ms
>>access.
>
>
>gunung singgalang dan bukit barisanberjejer tegak tinggi menjulangniat hati 
>ingin berusaha, kawan.apalah daya jika ilmu terlalu tinggi di awan
>
>>Hafrizal
>>--- Pada Kam, 10/6/10, Keep spirit Belajar access <keepspirit.belajara 
>>cc...@yahoo. co.id> menulis:
>
>>Dari: Keep spirit Belajar access <keepspirit.belajara cc...@yahoo. co.id>
>>Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis
>>Kepada: belajar-access@ yahoogroups. com
>>Tanggal: Kamis, 10 Juni, 2010, 2:23 
>
>
>
>
>>      Sedikit menambahkan bpk, bagaimana jika dibuatkan satu field 
>> terima_lampiran_ dari Di Excel data kolom-kolomnya:
>
>>------------ --------- --------- --------- --------- --------- --------- 
>>--------- --------- --------- --------- --------- --------- -
>>NoKTP, Nama, Alamat, Kota, KodePos, Kabupaten, Propinsi, terima_lampiran_ dari
>>------------ --------- --------- --------- --------- --------- --------- 
>>--------- --------- --------- --------- --------- --------- -
>>Dari sini file excel dengan nama yang selalu sama yang akan diimport oleh 
>>access dengan sekali button klik.  Nah nanti di report accessnya field 
>>terima_lampiran_ dari, di grouping, atau diatur sesuai kebutuhan.
>
>>Salam,
>>~ KSBA | Keep the Spirit of Belajar Access ~
>
>>pucuk di pohon melambai-lambai
>>tertiup angin dari arah tenggara
>>jika ingin lebih santai
>>mungkin ini bisa jadi sulusinya
>
>>--- Pada Kam, 10/6/10, Hafrizal Manna <hafrizal.manna@ yahoo.co. id> menulis:
>
>>Dari:
>>Hafrizal Manna <hafrizal.manna@ yahoo.co. id>
>>Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis
>>Kepada: belajar-access@ yahoogroups. com
>>Tanggal: Kamis, 10 Juni, 2010, 1:54 AM
>
>>Terimakasih atas tanggapan yang dari pak Harry.
>
>>Mungkin kegiatannya seperti ini pak.
>>saat terima lampiran dari iswadi misalnya, saya rename excel menjadi 
>>iswadi.xls, trus saya taruh di folder kiriman.
>>saat terima lampiran dari buyung misalnya, saya rename excel menjadi 
>>buyung.xls trus
>>saya taruh di folder kiriman.
>
>>misalnya ada dua file excel tersebut.
>
>>bisakah dibuat program untuk mengambil otomatis mengimpor data tersebut ke ms 
>>access. jadi prosesnya satu kali klik. kalau dengan usulan bapak tadi, 
>>berarti saya harus menggabungkan dahulu di excel.
>
>>mohon dimaaftkan bila konsepnya belum sesuai dengan apa yang saya bayangkan.
>
>>pucuk di pohon melambai-lambai
>>tertiup angin dari arah barat
>>maksud hati ingin lebih santai
>>satu kali klik lenyap sudah kerjaan berat
>
>>Hafrizal
>
>>--- Pada
>>Kam, 10/6/10,
>>Harry siswanto <harry.siswanto@ gmail.com> menulis:
>
>>Dari: Harry siswanto <harry.siswanto@ gmail.com>
>>Judul: Re: [belajar-access] Import Excel ke Access Secara Otomatis
>>Kepada: belajar-access@ yahoogroups. com
>>Tanggal: Kamis, 10 Juni, 2010, 1:39 AM
>
>>Konsepnya,
>
>>pada waktu di Excel
>>Gabungkan semua data yang diterima terlebih dahulu;
>>Menjadi satu File 
>>dan dengan Struktur yang sama.
>>Catatan; Banyak baris di Excel tidak dapat lebih dari 65536 baris.
>
>>dari MsAccess,
>>lakukan Import
>>buat macronya, untuk mempermudah dan mempercepat Import File dari Excel pada 
>>Periode selanjutnya.
>>masukan terlebih dahulu dalam Temporary Table.
>>setelah dibersihkan dari data2 yang mungkin tidak diperlukan,
>>lakukan Append atau Add ke Master Table atau Transaksi.
>>Temporary Table dapat dikosongkan untuk Import periode berikutnya.
>
>>setelah file dari Excel selesai di Import, 
>>berikan tanda atau ubah nama Filenya, untuk menandakan bahwa Data Excel 
>>tersebut telah dikirim ke MsAccess.
>
>>kira2 demikian
>>Semoga membantu..
>
>>salam
>>Harry
>
>>Pada 10 Juni 2010 08:17, Hafrizal Manna <hafrizal.manna@ yahoo.co. id> 
>>menulis:
>
>>Salam kenal. 
>>Saya Hafrizal Manna dari Bukit Tinggi Sumbar.
>>Saya punya kebutuhan untuk mengotomasi impor data dari excel ke ms access 
>>untuk pengolahan lebih lanjut.
>>Kasusnya begini.
>>Di Excel saya punya data kolom-kolom
>
>>NoKTP, Nama, Alamat, Kota, KodePos, Kabupaten, Propinsi.
>
>>Saya memberikan file ini kepada beberapa orang untuk dientry.
>>Hasil entry rencananya dikirim via email dan nantinya saya masukkan ke folder 
>>bernama kiriman.
>
>>setelah itu ...
>>saya tekan tombol. data di excel( bisa ada lebih dari satu file), otomatis 
>>akan terkopi ke ms access.
>>setelah itu, file excel dipindahkan ke folder bernama sdh_diproses
>
>>saya benar-benar baru di access. jadi mohon bimbingannya.
>
>>buah belimbing rasanya segar
>>dibikin manisan tahan lebih lama
>>mohon dibimbing agar lebih pintar 
>>doa saya senantiasa menyertai saudara
>
>>Hafrizal
>
>>-- 
>>Harry Siswanto
>>Email: harry.siswanto@ gmail.com
>http://www.facebook .com/harry. siswanto
>
>http://harry- siswanto. blogspot. com/
>
>

 

Kirim email ke