Membuat Kwitansi Bagian 1

Bila kamu seorang Bendahara, seringkali kita bila dihadapkan dengan tetek bengek kuitansi yang perlu dibuat secepat-cepatnya, memang bukan hal yang terlalu menyibukkan kalau jumlahnya hanya satu dua buah, tapi gimana bila kita perlu memuat 100 buah perhari???, tentu saja hal ini bisa saja terjadi, pada saat diperlukan dan perlunya ketelitian, pembuatan kuitansi yang efektif dan efisien sangat diharapkan.

Umumnya kuitansi dibuat pada kertas kuitansi yang dipesan khusus dan dibuat beberapa rangkap serta telah berisi format tertentu, tapi ini cukup menyita waktu bila harus dilakukan dengan mesin ketik.

Berdasarkan pengalaman pribadi, disini akan kita mencoba membuat kuitansi di Microsoft Excel, dan memaksimalkan fasilitas fasilitasnya untuk memudahkan kita dalan pembuatannya.

Sebagai awalnya, saya memenggunakan 3 worksheet untuk pembuatannya

1. Form Utama / Kwitansi
2. Data Utama
3. Data Pendukung

1. Form Utama
Sheet ini kita gunakan sebagai output ke printer maksundnya keluaran data dihasilkan, data yang dimasukkan dan berakhir di form ini untuk kemudian diprint. Mari kita buat form sebagus mungkin.

2. Data Utama
Dalam sheet ini, semua data yang diperlukan kita masukkan, semua unsur unsur yang diperkirakan dinamis kita buat sedemikian rupa supaya mudah mengisinya,

saya menganggap ada 13 unsur penting didata utama dan dibuat masing masing kolomnya, antara lain :

• No.
• Kode Rekening
• Terima Dari
• Tahun
• Sebesar
• PPn
• PPh Pasal
• Pajak Lainnya
• Jumlah Pajak
• Lunas Tanggal
• Penerima
• Alamat
• Untuk Pembayaran

3. Data Pendukung

Data pendukung diisi data untuk melengkapi/membatu data utama, saya isi tentang pajak dan pernik perniknya

pertama saya tulis jenis jenis pajaknya, kemudian saya blok dan beri nama, ini untuk memudahkan dalam memanggilnya dalam penggunakan formula

Umumnya pengenaan pajak lebih dari sekali, misalnya PPN, biasanya dibarengi dengan pajak PPH22 untuk pembelian barang, karenanya juga perlu kita masukkan.

Data ini nantinya akan kita operasikan bersama fungsi VLOOKUP, jadi perlu di urutkan terlebih dulu, kemudian memberi nama supaya langsung bisa dipanggil, disini saya kasih nama "datappn"

Setelah data pendukung ini dibuat, kita kembali ke Data Utama, data pendukung kita gunakan sebagai validasi input "Pajak Lainnya", disni kita pilih List dan Sourcenya ="listppn"

kalau sukses seharusnya akan ada dropdown data bila kita klik 

Sampai disini kita telah membuat 3 data untuk keperluan pembuatan kwitansi,

Tulisan selanjutnya kita akan menyelesaikan pembuatan kwitansi ini, itu pun kalo ada yang tertarik

Angka ke Terbilang

Dalam pembuatan kwitansi, biasanya selalu diterakan jumlah nominal dalam angka dan terbilang, adanya terbilang mungkin untuk menegaskan dan supaya tidak bisa dimanipulasi kali ya, namanya juga uang, biasanya urusan bisa jadi sensitif.

Cukup banyak contoh contoh bagaimana merubah angka menjadi terbilang, salah satunya step by step akan kita bahas bagaimana menghasilkan kalimat dari nominal, alurnya dibuat sejelas mungkin untuk memudahkan dipahami.

Mari kita buka ms.excel kita, masuk ke visual basic dengan menekan tombol "ALT+F11", kemudian kita tambahkan sebuah modul supaya code yang kita buat bisa diakses dari semua sheet yang ada di workbook kita,disini saya buat fungsi misalnya dengan nama "sebutan"




Bagaimana jumlah digit nominal yang bisa jadikan terbilang ????? ,

Seharusnya ya bisa sampe dimana kita bisa menyebut angka itu, misal sejuta, satu milyar, dan seterusnya, kalo nominal yang nggak bisa menyebutnya ya nggak bisa, wong nyebutnya aja nggak bisa, apa lagi menuliskannya dalam bentuk kalimat, ya misalnya 1 dengan jumlah 0 100 kali, kan bingung mau nyebutnya.

Fungsi terbilang disini kita akan membatasi nominal sampai 12 digit saja, ini sudah cukup karena umumnya transaksi sampe 12 digit hampir tidak pernah ditemui, misalnya nominal 100.100.100.100 kita menyebutnya seratus milyar seratus juta seratus ribu seratus.

Dari contoh diatas bisa kita lihat, nominal terpisah dengan tanda titik, yang masing-masing adalah milyar, juta, ribu dan anggap yang terkahir satuan, jadi dalam fungsi, kita masukkan pengelompokan ini sebagai varible.

Demikian Juga untuk hasilnya, supaya lebih mudah dikelompokkan, kita buat variable untuk hasil sementara,
Karena kita hanya mengolah nominal maksimal 12 digit, kita juga perlu membatasi jumlah maksimalnya, disini kita menggunakan variable NilaiString

setelah itu baru kita masukkan pengelompokkan data awalnya

Supaya terlihat rapi, fungsi untuk mendapatkan terbilang perkelompok kita buat terpisah, anggap ini anak fungsi, disini saya berinama fungsi ConvertAngka

Berikutnya kita isi variable angka() dengan sebutannya, misalnya angka(1)="Satu",angka(2)="Dua" sampe angka 9,

Selanjutnya konversi nominalnya seperti ini

disini kita sudah selesei fungsi ini, kita kembali ke fungsi sebutan, dan kita mulai mengambil hasil fungsi konvertnya

Sekarang dah rampung macronya, tinggal testing di excel, tekan ALT+F11

Sukses kayanya, moga bergunalah wallll...

Convert DMS format to Decimal

Convert Degree Minute Second format To Decimal 

Seperti satuan waktu, yang memiliki perbandingan 60 kali untuk setiap kenaikan satuannya, koordinat juga demikian, 60 second = 1 minute dan 60 minute = 1 degree.

Untuk mendapatkan nilai decimal, kita bisa langsung memperolehnya dengan menjumlahkan nilai degree ditambah minute dibagi 60 tambah second dibagi 3600, sehingga bila di buat macro, tentu akan lebih mudah.

Misalnya kita berinama fungsi Cvt_DMStoDecimal

dan bisa langsung dipanggil dari excel kita

anak smp juga bisa kali...

Untuk merubah Degree Minute Second yang memiliki format string coordinate, kita bisa menggunakan formula seperti ini :

Moga mermanfaat bro