BERMAIN DENGAN CONTROL TEXTBOX (5) [MACRO VBA EXCEL TUTORIAL SERIES]

Assalamualaikum Warohmatullahi Wabarokatuh

Sodara2 sekaliYan para pembatja jang boediman … artikel tentang Control TextBox disambung lagi … dan ini adalah artikel yang terakhir setelah empat artikel sebelumnya

artikel yang pertama tentang cara mencari nilai sebuah Control TextBox (klik disini) yang berlanjut ke artikel kedua tentang cara memasukkan/mengambil nilai Cell Worksheet Excel ke Control TextBox dan sebaliknya cara memasukkan nilai Control TextBox ke Cell Worksheet Excel (klik disini)

artikel ketiga tentang Control TextBox membahas cara memberikan validasi angka data pada Control TextBox (klik disini)… yang berguna untuk membatasi Control TextBox hanya akan menerima input data yang berupa angka saja … sedangkan inputan berupa teks akan ditolak oleh Control TextBox

artikel yang keempat membahas tentang cara Autoformat TextBox (klik disini)… autoformat diperlukan jika data yang dientrikan pada TextBox mempunyai pola khusus seperti : Tanggal (DD/MM/YYYY, MM/DD/YYYY, D-MMM-YYYY), Jam (HH:MM:SS), Nomor Telepon (0808 0909 0707, (021) 1234 5678) dsb

dan untuk artikel yang kelima ini … sekaligus sebagai artikel penutup tentang Control TextBox akan dibahas tentang cara melakukan operasi aritmatikan pada beberapa Control TextBox seperti : perkalian ( * ) , pembagian ( / ), penjumlahan ( + ) ataupun pengurangan ( – )

dalam contoh file TextBox.xlsm yang bisa sOdara download dari folder 2017>>07JUL … operasi aritmatika yang dijadikan contoh adalah operasi Penjumlahan … dimana nilai TextBox4 akan dijumlahkan dengan nilai TextBox5 dan hasilnya akan ditampilkan pada TextBox6 seperti yang bisa sOdara lihat pada gambar berikut

F. Operasi Penjumlahan

agar bisa dilakukan operasi aritmatika nilai dari Control TextBox tidak boleh berupa Teks …. sehingga pada Control TextBox yang akan dilakukan operasi sebaiknya diberi validasi agar karakter yang bisa dientrikan hanya angka saja …. caranya silahkan baca artikel sebelumnya (klik disini)

selanjutnya setelah untuk memicu prosedur yang akan melakukan operasi penambahan bisa dimanfaatkan event TextBox_Change …. event ini terjadi saat nilai Control TextBox berubah … prosedur untuk operasi penambahannya sendiri sendiri sebenarnya bisa diletakkan pada event ini … namun karena ada beberapa Control TextBox yang akan menjalankan prosedur ini (dalam contoh TextBox4 dan TextBox5) maka untuk operasi penambahan ini saya bikinkan prosedur tersendiri yaitu prosedur JumlahkanT4T5 … prosedur JumlahkanT4T5 ini yang akan dipanggil dari event TextBox4_Change4 dan TextBox4_Change5 … seperti gambar berikut

dalam prosedur JumlahkanT4T5 untuk melakukan operasi penjumlahan TextBox4 dan TextBox5  dan menampilkannya pada TextBox6 … sebenarnya cukup menggunakan kode berikut

TextBox6.Value = TextBox4.Value + TextBox5.Value

tetapi untuk memperkuat Validasi data dan penanganan error kodenya menjadi seperti yang ada pada gambar diatas … untuk memperkuat validasinya saya gunakan vatriabel T4 dan T5 untuk menampung nilai TextBox4 dan TextBox5 dengan tipe data Long

sedangkan untuk penangan error saya tambahkan kode berikut

On Error GoTo ErrJumlahkan

sehingga saat terjadi error … prosedur akan loncat ke perintah

TextBox6.Value = "Error"

hasilnya saat terjadi Error dalam penjumlahan TextBox4 dan TextBox5  … TextBox6 akan menampilkan tulisan “Error”

demikiYanlah artikel terakhir mengenai Control TextBox yang berisi contoh cara melakukan operasi penjumlahan pada Control TextBox … meskipun artikel ini adalah artikel terakhir sebenarnya masih banyak lagi “permainan” yang bisa sOdara mainkan pada sebuah Control TextBox … namun karena berbagai keterbatasan saya hanya bisa publish 5 artikel ini

sekiYan semoga bisa bermanpaat dan MDLMDL

bingung cara downloadnya ?? Baca aja halaman download dengan klik icon di samping

feed , email and my social media