UJIAN AKHIR SEMESTER KOMPUTER UNTUK ANALISIS LEMBAR KERJA

STUDI KASUS








CARA :
1. Pertama buat 4 tabel seperti gambar dibawah ini sebagai acuan untuk input data kesheet selanjutnya.


Kemudian buatlah tombol yang berfungsi sebagai pen - submit data yang udah ditulis ke sheet selanjutnya. Tombol ini dari pengaturan word option untuk memunculkannya dengan nama ribbon Developer
2. Untuk Script atau yang dikenal istilah Macro dalam Office seperti dibawah ini


Untuk Script Macronya sendiri yaitu ( Copas aja biar gampang )

Sub CMDINPUT()
Dim A, B, C, D, E As String

  'PILIH SHEET
    Sheets("Sheet1").Select

    'DATA
    A = Range("C3").Text
    B = Range("C4").Text
    C = Range("C5").Text
    D = Range("C6").Text
    E = Range("C7").Text
      
'MASUKAN DATA
      
    'If MsgBox("Yakin Anda Akan Menyimpannya ?", vbYesNo + vbQuestion, "Konfirmasi") = vbYes Then
  
    'MASUKAN KE SHEET DATA MASUK
    Sheets("Sheet2").Select
    jumlahData = Range("F1").Value
    Rows(jumlahData + 2 & ":" & jumlahData + 2).Select
    Selection.Copy
    Rows(jumlahData + 2 & ":" & jumlahData + 2).Select
    ActiveSheet.Paste
    Application.CutCopyMode = False

    Range("A" & jumlahData + 2).Select
    ActiveCell.FormulaR1C1 = A
    Range("B" & jumlahData + 2).Select
    ActiveCell.FormulaR1C1 = B
    Range("C" & jumlahData + 2).Select
    ActiveCell.FormulaR1C1 = C
    Range("D" & jumlahData + 2).Select
    ActiveCell.FormulaR1C1 = D
    Range("E" & jumlahData + 2).Select
    ActiveCell.FormulaR1C1 = E
   
    Sheets("Sheet1").Select
    Range("C3:C7") = ""
    Range("C3").Select
   
End Sub


3. Nah udah selesai kan macronya. Selanjutnya data yang kita input akan muncul seperti ini

NB : Count berfungsi untuk menghitung banyaknya kemunculan data

4. Selanjutnya kita buat tabel angsuran dan harga kredit seperti di bawah ini



 RUMUS :

Angsuran Pokok : Harga-Tenor(Bulan)
Angsuran Bunga : Harga*Bunga pertahun dibagi 12 bulan
Angsuran Total : Angsuran Pokok + Angsuran Bunga
Harga Kredit   : Tenor (bulan)*Angsuran Total


Untuk mencari Merek Sepeda Motor Menggunakan Rumus =VLOOKUP(kode;tabel data;urutan tabel yang ingin dimasukkan pada data;TRUE).

5.  Selanjutnya Membuat Pivot Table dengan ketentuan objek yang dilingkari seperti gambar dibawah ini . Cara membuat pivot table sendiri berada di ribbon insert - pivot table yang sebelumnya objek harus diblok semua agar bisa masuk kedalam Pivot



NB : Jika Ingin membuat Pivot Table, harus semua header cuma berada di satu cell semua atau 2 cell semua(Merge) dst. Jika  tidak data akan tidak beraturan

6. Selanjutnya membuat jumlah penjualan dengan menggunakan rumus =(COUNTIF($F$3:$F$14;B28)) yang kemudian ditampilkan dalam bentuk grafik seperti dibawah ini



7. Selanjunya adalah menggunakan fungsi SORT DAN FILTER Data. Disini tugas nya dalam Sheet 6 harus menggunakan perintah Sort. Untuk itu kita hanya mengambil Tabel nama Sepeda Motor dan Harganya yang kemudian kita blok semua-pilih ribbon home - sort dan filter - pilih custom sort.


SELESAII............................

FILE ASLI PEMBAHASAN :https://drive.google.com/open?id=1dZwIMx_WIOIlupelURov74CPp9ZhjPOv
































Tidak ada komentar:

Posting Komentar