Laporan Akhir

Laporan Akhir

Microsoft Excel

Nama               : Raina Putri Anisa

Npm                : 15515590

VBA adalah sebuah pemrograman bahasa yang sangat canggih dan bagus, ini memungkinkan untuk membuat fungsi atau perintah sendiri dalam sebuah file Spreadsheet di Excel. Berikut adalah contohnya:

1.   Input

Disini saya akan mengisi Nama, Npm, Kelas, Jam berangkat, Jam Sampai dengan assign macro. Langkahnya seperti berikut:

-          Klik kanan pada input à Assign Macro à Klik New à OK 

-          Setelah klik OK lalu isi data seperti berikut:

Saya akan menjelaskan code yang ada diatas

1.      Membuat Nama, Npm, kelas, berangkat, sampai menjadi tipe data Variant

2.      Total menjadi tipe data integer

3.   Pada inputbox tersebut akan muncul kata “Masukkan Nama Anda”. Ini akan berlaku juga pada inputbox lainnya sesuai dengan ketentuan.

4.      Ketika kita mengisi inputbox dengan nama kita, range D4 akan muncul nama kita yang telah kita isi pada inputbox. Ini berlaku juga pada npm, kelas, berangkat, sampai (sesuai ketentuan)

5.  Kata Val disini mengubah data sampai dan berangkat menjadi integer, sehingga kita dapat menghitung total dari jumlah berangkat dan sampai

6.      Apabila total dari berangkat dan sampai lebih dari 1000, maka:

7.      Pada range F8 akan muncul Rp. 50.000

8.      Apabila total dari berangkat dan sampai antara 500-999, maka range F8 akan muncul Rp. 40.000

9.      Apabila total dari berangkat dan sampai antara 250-499, maka range F8 akan muncul Rp. 30.000

10.  Apabila total tidak ada sesuai dengan 3 ketentuan diatas (total dibawah 250) maka range F8 akan muncul Rp. 20.000

11.  End if berfungsi untuk mengakhiri kondisi diatas

-          Setelah selesai semua klik tanda seperti dibawah ini:

-          Lalu akan muncul seperti ini :

      

                             

-     Maka pada range tersebut akan terisi sesuai dengan yang sudah diisi pada inputbox

Tabel diatas adalah contoh kondisi pada no 6 dan 7 (total berangkat dan sampai lebih dari 1000 sehingga ongkos yang tertera menjadi Rp. 50.000

-          Kondisi no 8 (total berangkat dan sampai antara 500-999. Ongkos yang tertera menjadi 40.000

-          Begitu pula dengan kondisi no 9 dan 10. Range F4 akan terisi sesuai dengan kondisi yang ada

2.   Delete

            1)      Klik kanan pada delete à assign macro à new à Ok

            2)      Isi data dengan sebagai berikut:

Maksud dari range (“D4,D6,D8,F4,F6,F8”). Value = “ “ adalah mengisi range tersebut dengan spasi, jadi seolah-olah pada range tersebut terdelete.

3.   Love

            1)      Klik kanan pada delete à assign macro à new à Ok

            2)      Isi data dengan sebagai berikut

Kita akan membuat MsgBox bertulisan Program Gunadarma Lovejek, seperti ini: