Kriteria Text, Angka Dan Tanggal

Dikarenakan ada lumayan banyak yang bertanya kepada penulis mengenai perbedaan penulisan dalam kriteria sebuah fungsi, maka sepertinya penulis harus menyampaikan lagi tentang cara penulisan dalam sebuah kriteria dari fungsi atau statemen dalam VBA. Sebenarnya penulis telah memposting hal ini, yaitu pada halaman yang berjudul Penulisan Kriteria Fungsi dalam blog ini. Disini penulis hanya ingin menjelaskan lebih jauh lagi mengenai penulisan kriteria untuk sebuah fungsi atau statemen dalam vba.

Dalam tulisan sebelumnya penulis telah memberikan contoh mengenai cara penulisan kriteria dari sebuah fungsi, dimana pada tulisan tersebut, yang harus anda sesuaikan untuk menulis kriteria dalam sebuah form adalah Type Data dari field dalam tabel yang menjadi kriteria tersebut, bukan format dari Textbox atau Combobox atau ListBox atau yang lainnya dalam form tersebut.

Jika Field dalam table anda adalah bertipe Text (walaupun mungkin data dalam field tersebut berupa angka), maka penulisan kriterianya harus menggunakan tanda penghubung petik tunggal ('), Jika Field dalam table anda (yang menjadi kriteria) bertipe data angka, maka anda tidak boleh menggunakan operator penghubung. Dan jika Field dalam table anda bertipe data tanggal, maka operator yang harus digunakan adalah tanda kres/pagar (#). Contohnya :

1. DLookUp("nama_karyawan", "tblDetailKaryawan", "[id_karyawan] = '" & Me.idKaryawan & "'")
2. DLookUp("nama_karyawan", "tblDetailKaryawan", "[nomor_karyawan] =" & Me.NomorKaryawan)
3. DLookUp("nama_karyawan", "tblDetailKaryawan", "[tanggal_masuk] = #" & Me.TglMasuk & "#")

Perhatikan yang penulis tandai dengan warna Merah.

Contoh nomor 1 adalah contoh penulisan fungsi DLookUp dengan kriteria field id_karyawan dalam tabel tblDetailKaryawan bertipe data Text, sehingga dalam penulisan kriterianya harus menggunakan operator penghubung tanda petik tunggal (')

Contoh nomor 2 adalah contoh penulisan fungsi DLookUp dengan kriteria field nomor_karyawan dalam tabel tblDetailKaryawan bertipe data angka (Number), sehingga dalam penulisan kriterianya tidak boleh menggunakan tanda operator penghubung.

Contoh nomor 3 adalah contoh penulisan fungsi DLookUp dengan kriteria tanggal_masuk dalam tabel tblDetailKaryawan bertipe data tanggal (Date/Time), sehingga dalam penulisan kriterianya harus menggunakan operator penghubung tanda kres/pagar (#).

Jika anda salah dalam menggunakan operator penghubungnya, maka anda akan mendapatkan error Type Missmatch, atau bisa juga (kadang-kadang) tidak menampilkan pesan apa-apa, namun untuk case ini sepertinya tidak akan terjadi, jika anda tidak menggunakan statemen On Error Resume Next, atau error handling yang sejenisnya. Anda jangan melihat pada Form yang anda buat, ataupun data dalam tabel anda, akan tetapi (sekali lagi) yang harus anda perhatikan dan sesuaikan adalah hanya pada tipe data (Data Type) dari Field yang akan anda jadikan kriteria dalam fungsi atau statemen anda.

Semoga Bermanfaat..