Showing posts with label VBA. Show all posts
Showing posts with label VBA. Show all posts

Thursday, March 9, 2017

Membuat Function Untuk Mengekspor Record Dari Microsoft Access Ke Microsoft Excel

www.AstroDigi.com AstroDigi.com | Kamis, 9 Mar 2017 | Salah satu keunggulan Microsoft Excel dibandingkan dengan Microsoft Access adalah kemudahannya dalam membuat "custom spreadsheet". Dengan Microsoft Excel user dapat dengan mudah mengatur sendiri seperti apa nantinya print out dari pekerjaannya.

Dengan Microsoft Excel user dapat dengan mudah mengatur lebar kolom, mengatur ketinggian baris, merubah desain kop laporan, mengedit record, melakukan copy-paste dari record tertentu, dan lain sebagainya. Hal seperti ini yang tidak bisa didapatkan pada Microsoft Access. Untuk itulah maka cara termudah untuk membuat laporan yang fleksibel adalah mengekspor record (data) dari Microsoft Access ke Microsoft Excel.

Friday, March 3, 2017

Membuat Function Untuk Mem-filter Record Dari Suatu Tabel

www.AstroDigi.com AstroDigi.com | Jumat, 03 Maret 2017 | Pada Microsoft Access, untuk memfilter record dari sebuah field biasanya programmer menggunakan query dengan klausa "Where" sebagai penentu persyaratan dari record yang boleh tampil.

Seringkali dibutuhkan sebuah fungsi yang dapat menggantikan asterisk (tanda bintang (*)) pada saat sebuah text-box digunakan sebagai media untuk menuliskan karakter penenut filter. Jadi misalnya saja dari sederetan record berisi nama-nama karyawan, diinginkan untuk menampilkan karyawan yang namanya mengandung "udi".

Monday, February 27, 2017

Function Untuk Menyisipkan Field Dengan Tipe Data Autonumber

www.AstroDigi.com AstroDigi.com | Senin, 27 Feb 2017 | Field dengan tipe data Autonumber seringkali dibutuhkan sebagai field yang digunakan sebagai index dari sebuah tabel dan juga dipergunakan sebagai field penghubung (relationship) dengan tabel yang lainnya. Untuk menambahkan field dengan tipe data Autonumber mudah dilakukan secara manual, namun perlu function yang sedikit agak panjang untuk menambahkan lewat VBA.

Ada 2 jenis field yang penanganannya sedikit berbeda yaitu pembuatan field dengan tipe data Hyperlink dan field dengan tipe data Autonumber. Pembuatan field dengan tipe data Hyperlink sudah pernah saya bahas pada artikel sebelumnya beberapa waktu yang lalu. Kali ini giliran saya bahas pembuatan function untuk field dengan tipe data Autonumber. Berikut ini susunan instruksinya:

Tuesday, February 21, 2017

2 Pilihan Function Untuk Mengisi Field Dengan Angka Hitungan Maju Atau Angka Hitungan Mundur

www.AstroDigi.com AstroDigi.com | Selasa, 21 Feb 2017 | Dalam menyusun program kadangkala saya memerlukan sebuah tabel dengan jumlah record yang sudah saya batasi dan didalamnya sudah terdapat sebuah field yang berisi angka yang berurutan. Kadangkala saya membutuhkan angka berurutan maju/naik (up counting) dan kadangkala saya membutuhkan angka berurutan mundur/turun (down counting). Biasanya hal ini saya lakukan untuk form khusus yang hanya bisa diedit dan tidak pula bisa dihapus atau ditambah.

Tabel record terbatas semacam ini biasanya digunakan untuk mencatat daftar penumpang pada kendaraan umum atau pesawat, daftar pengunjung bioskop yang jumlah kursinya memang terbatas, daftar undangan terbatas, dan lain sebagainya yang record-nya memang terbatas.

Friday, February 17, 2017

Function Untuk Menghapus PRIMARY KEY dan Menghapus INDEX

www.AstroDigi.com AstroDigi.com | Jumat, 17 Feb 2017 | Dalam artikel kali ini saya akan berbagi mengenai cara untuk menghapus Primary Key yang ada pada sebuah tabel dan juga cara untuk menghapus Index yang ada pada sebuah field.

Dalam sebuah tabel Primary Key hanya boleh ada satu saja, maka bila seorang programmer ingin menambahkan sebuah field dengan Primary Key, maka Primary Key yang sudah ada harus dihapus terlebih dahulu.

Sunday, February 12, 2017

Instruksi VBA Untuk Menyisipkan Field Pada Tabel Yang Sudah Ada (Eksis)

www.AstroDigi.com AstroDigi.com | Minggu, 12 Feb 2016 | Bila pada artikel sebelumnya saya menjabarkan tentang cara untuk membuat tabel, maka pada artikel kali ini saya akan berbagi cara untuk menyisipkan (menambahkan) field pada tabel yang sudah ada (eksis). Untuk keperluan tersebut saya menggunakan fasilitas ADO recordset sebagai sarana untuk mewujudkan pembuatan field tambahan tersebut.

Berikut ini adalah kode-kode instruksi untuk menyisipkan field:

Private Sub InsertTable()
Dim Db As DAO.Database
Dim Tbl As DAO.TableDef
Dim Fld As DAO.Field
Dim tableKu, fieldKu As String

Saturday, February 11, 2017

Menciptakan Tabel Dengan Instruksi DAO Recordset

www.AstroDigi.com AstroDigi.com | Sabtu, 11 Feb 2017 | Ada saat dimana seorang programmer butuh untuk membuat tabel lewat pemrograman, biasanya adalah saat perlu sebuah tabel temporer untuk menampung data.

Bila beberapa hari sebelumnya saya berbagi tentang bagaimana cara untuk menghapus tabel maka kali ini saya berbagi tentang cara untuk membuat tabel. Programmer yang menguasai cara untuk membuat dan menghapus tabel akan lebih fleksibel dalam mengatur strategi penempatan data, termasuk juga untuk kemudahan pengamanan data.

Thursday, February 9, 2017

Membuat Function Untuk Melakukan Cek Keberadaan Tabel Dan Menghapusnya Bila Perlu

www.AstroDigi.com AstroDigi.com | Kamis, 09 Feb 2017 | Artikel ini merupakan kelanjutan dan juga penggabungan dari dua buah artikel AstroDigi.com sebelumnya yaitu:
1. 3 Langkah Untuk Menguji Keberadaan Tabel Dan Menghapus Tabel
2. Membuat Function Di MS Access (Disertai Contoh)

Pada artikel kali saya akan memberikan cara membuat function yang berfungsi untuk menguji keberadaan data dan user bisa memilih untuk menghapus tabel yang ditemukan atau hanya sekedar memberitahukan bahwa tabel yang diuji eksis atau tidak.
Berikut ini adalah kode instruksinya:

Saturday, February 4, 2017

Membuat Function Di MS Access (Disertai Contoh)

www.AstroDigi.com AstroDigi.com | Sabtu, 4 Feb 2017 | Bagi programmer yang sudah mengerti cukup banyak tentang VBA, peran function (fungsi) pada pemrograman sudah menjadi bagian dari penyusunan instruksi.

Tetapi bagi programmer pemula, biasanya hanya function bawaan MS Access saja yang dipakai untuk menyusun instruksi, banyak yang belum tahu cara menciptakan function sendiri, untuk kepraktisan pemrograman.

Dalam artikel ini saya akan coba menjelaskan dengan cara yang mudah untuk dipahami.

Friday, February 3, 2017

3 Langkah Untuk Menguji Keberadaan Tabel Dan Menghapus Tabel

www.AstroDigi.com AstroDigi.com | Jumat, 3 Feb 2017 | Dalam melakukan pemrograman dengan Microsoft Access, seringkali seorang programmer perlu untuk melakukan pengecekan apakah sebuah tabel sudah berada didalam database (file .MDB) yang sedang dikerjakannya.

Dan seringkali pula seorang programmer perlu menghapus sebuah tabel yang berada didalam database. Biasanya hal ini dilakukan bila tabel tersebut hanya diperlukan untuk sementara waktu saja (temporary table).

Dalam artikel kali ini saya akan berbagi tentang cara melakukan pengecekan mengenai keberadaan sebuah tabel dan juga sekaligus menjelaskan cara menghapus tabel lewat VBA.

Wednesday, January 25, 2017

Bekerja Dengan DAO Recordset

www.AstroDigi.com AstroDigi.com | Rabu, 25 Jan 2017 | Dalam pemrograman adakalanya user membutuhkan data yang diambil dari sebuah tabel yang bukan merupakan "record source" (sumber data) dari form yang bersangkutan. Data bisa diambil dengan fungsi dalam kelompok "data retrieval" , seperti DLookUp, DMax, DFirst, DLast, dan lain sebagainya.

Cara lain adalah dengan membuka tabel dan meletakkannya dalam sebuah buffer (memori penampung record), dan bekerja dengan semua data yang ada sudah ada didalam buffer tersebut. Cara ini lebih cepat untuk data yang berjumlah besar dan lebih fleksibel dan praktis bila bekerja dengan record yang lebih banyak.

Instruksi VBA untuk memulai Recordset adalah:

Wednesday, March 23, 2016

Membuat Pengulangan Menggunakan Array

www.AstroDigi.com AstroDigi.com | Rabu, 23 Mar 2016 | Beberapa waktu yang lalu saya pernah membahas mengenai penggunaan ARRAY dalam pemrograman. Kali ini saya akan membahas cara untuk membuat pengulangan dengan memanfaatkan nomor index pada array.

Contoh:

Dim buahKesukaanku(0 to 6) As String, hitunganKu as Long
     
buahKesukaanku(0) = "Jambu "
buahKesukaanku(1) = "Nanas "
buahKesukaanku(2) = "Nangka "
buahKesukaanku(3) = "Pepaya "
buahKesukaanku(4) = "Mangga "
buahKesukaanku(5) = "Jeruk "
buahKesukaanku(6) = "Tomat "
     
For hitunganKu = LBound(buahKesukaanku) To UBound(buahKesukaanku)

    MsgBox buahKesukaanku(hitunganKu)

Next hitunganKu

Thursday, March 17, 2016

Perintah For .. Next Pada VBA, Untuk Melakukan Pengulangan/Loop

www.AstroDigi.com AstroDigi.com | Kamis, 17 Mar 2016 | Kali ini saya akan membahas perintah VBA yang digunakan untuk iterasi (pengulangan/loop) yaitu For .. Next. Sintax dari perintah Fro .. Next adalah: 

For counter As tipe_data = nilai_awal To nilai_akhir
-----
-----
Next counter

Catatan:
----- adalah deret baris perintah
Counter adalah variabel yang digunakan untuk menghitung jumlah pengulangan/ iterasi
Nilai_awal adalah variabel yang digunakan untuk menentukan nilai awal dari pengulangan
Nilai_akhir adalah variabel yang digunakan untuk menentukan nilai akhir dari pengulangan

Wednesday, March 9, 2016

Penggunaan Array Statik Dan Dinamik Dalam Pemrograman

www.AstroDigi.com AstroDigi.com | Rabu, 9 Mar 2016 | Dalam pemrograman seringkali kita membutuhkan variabel, dan adakalanya variabel yang dipergunakan mempunyai nama yang sama, hanya saja memiliki nomor yang berbeda untuk mempermudah pengenalan, misalnya:
------------------------------------------------
Buku0, Buku1, Buku2, Buku3 As String
------------------------------------------------
variabel yang mirip satu sama lain seperti diatas bisa digantikan dengan perintah ARRAY. Array artinya adalah pembuatan variabel beberapa sekaligus dengan penomoran disisi nama variabelnya, maka perintah VBA diatas dapat digantikan dengan: