001-234-567-8910

5th Avenue Madson, NY758, USA

Get Update on our recent Gadgets & Tabs


  • TUTORIAL

    Kumpulan artikel dan tutorial excel
    Lihat disini

  • TIPS

    Kumpulan artikel dan tutorial excel
    Lihat disini

  • PRODUCTS

    Kumpulan artikel dan tutorial excel
    Lihat disini
  • Kalkulator Hitung Sederhana Ala Microsoft Excel

    Pekerjaan menghitung atau mengolah angka didalam Microsoft Excel merupakan fungsi utama dari aplikasi ini, dimana seorang user dapat dengan mudah memasukkan nilai-nilai di dalam lembar kerja Microsoft Excel kemudian memasukkan formula hitung seperti SUM, AVERAGE, dan lainnya untuk menghasilkan nilai yang diinginkannya.

    Dengan kata lain, lembar kerja Microsoft Excel bisa dikatakan seperti sebuah kalkulator yang canggih yang mampu menghitung serta mengolah data-data yang sangat kompleks yang tidak bisa dilakukan oleh sebuah kalkulator.

    Berbicara tentang kalkulator, seorang user (baca programmer) sebenarnya dapat dengan mudah dan cepat memanggil aplikasi kalkulator bawaan sistem operasi hanya menggunakan kode sederhana Macro VBA

    Silahkan coba kode berikut jika Anda ingin memanggil aplikasi kalkulator
    Shell "calc", vbNormalFocus
    Namun jika Anda ingin membuat kalkulator sendiri menurut versi Anda, atau paling tidak ingin membuat kalkulator sesuai dengan apa yang akan dibahas di tutorial kali ini, maka siapkan terlebih dahulu beberapa bahan-bahan yang dibutuhkan, antara lain :
    • 1 UserForm
    • 2 TextBox, dan
    • 4 CommandButton
    Ok, langkah paling awal yang harus dilakukan setelah Anda membuka Aplikasi Microsoft Excel adalah dengan mengaktifkan jendela Microsoft Visual Basic Editor (VBE) yang dapat dengan mudah Anda akses menggunakan tombol pintas Alt+F11

    Setelah jendela Microsoft VBE berhasil dibuka, maka buat terlebih dulu sebuah UserForm dengan cara klik menu Insert dan pilih menu UserForm

    Membuat kalkulator sederhana ala Excel

    Berikutnya, silahkan tambahkan beberapa Controls di UserForm yang sudah dibuat sebelumnya seperti berikut
    excelive - kalkulator sederhana
    Anda bisa juga mengganti tulisan (caption) dari tombol CommandButton seperti simbol +, -, dan X untuk memudahkan pengoperasiannya nanti.

    Untuk menuliskan kode VBA, Anda tinggal klik ganda Control berikut, tuliskan kodenya di jendela penulisan kode :
    • Tombol C
      TextBox1 = vbNullString
      TextBox2 = vbNullString
      TextBox1.SetFocus
    • Tombol +
      TextBox2 = Val(TextBox2) + Val(TextBox1)
      TextBox1 = vbNullString
      TextBox1.SetFocus
    • Tombol -
      If TextBox2 = vbNullString Then
      TextBox2 = TextBox1
      TextBox1 = vbNullString
      TextBox1.SetFocus
      Else

      TextBox2 = Val(TextBox2) - Val(TextBox1)
      TextBox1 = vbNullString
      TextBox1.SetFocus
      End If
    • Tombol x
      If TextBox1 = vbNullString Then
      TextBox1.SetFocus
      Else
      If TextBox2 = vbNullString Then
      TextBox2 = TextBox1
      TextBox1 = vbNullString
      TextBox1.SetFocus
      Else
      TextBox2 = Val(TextBox2) * Val(TextBox1)
      TextBox1 = vbNullString
      TextBox1.SetFocus
      End If
      End If
    Selamat bereksperimen

    Mengisi ListBox Dengan Data Spesifik Dari Sebuah Lembar Kerja

    Listbox tidak ubahnya sama dengan Combobox yang mana memiliki fungsi yang sama yaitu menampilkan daftar berupa data-data yang bisa dipilih oleh user, hanya saja secara tampilan keduanya memiliki perbedaan, dimana ComboBox menampilkan daftar data berupa Drop Down yang tampil ketika diklik oleh pengguna, sementara tampilan ListBox berupa daftar yang bisa digulung keatas atau kebawah.

    Perbedaan ComboBox dan ListBox
    Perbedaan Listbox dan ComboBox

    Pada prinsipnya, baik ComboBox maupun ListBox bisa ditempatkan dilembar kerja Microsoft Excel maupun didalam sebuah UserForm serta cara pembuatannya yang sama, yakni tinggal diklik ikon yang mewakili control tersebut.

    Setelah mengetahui dasar cara pembuatan serta cara instalasi control tersebut, permasalah berikutnya adalah bagaimana cara mengisi data-data kedalamnya. Dan pada kesempatan kali ini, tutorial Macro VBA Excel yang akan dibahas hanya ListBox saja dan bagaimana menampilkan data-data kedalamnya, dengan catatan data-data yang ditampilkan memiliki kriteria tertentu yang sudah ditentukan sebelumnya.

    Sebelum mulai tutorial Macro VBA ini, ada baiknya buat atau siapkan sebuah data-data dalam lembar kerja Microsoft Excel seperti berikut :

    excelive : listbox spesifik


    Jika Anda lihat dalam lembar kerja excel diatas, terdapat sebuah kolom status yang mana nantinya akan difungsikan sebagai kriteria untuk menampilkan data kedalam ListBox.

    Setelah data selesai dibuat, kini saatnya Anda membuat sebuah ListBox dan sebuah CommandButton. Dan untuk tutorial kali ini, saya akan menempatkan control tersebut ke dalam lembar kerja, jadi pastikan dulu Menu Developer sudah Anda aktifkan (silahkan googling cara mengaktifkan menu Developer Microsoft Excel)

    Klik menu Developer dan klik icon Insert untuk menampilkan jendela Control, untuk tutorial ini ada baiknya Anda membuat bahan-bahan yang dibutuhkan dari menu ActiveX Control yang dapat dilakukan dengan cara; memilih ikon yang Anda inginkan dan gambar di lembar kerja.

    developer Microsoft Excel

    Untuk menampilkan data-data dari lembar kerja kedalam ListBox berdasarkan kriteria tertentu, maka sudah pasti harus menambahkan baris-baris kode yang difungsikan untuk membaca data dan menampilkannya. Dan Anda bisa mulai menuliskan kode-kode berikut ini dengan cara klik 2x tombol CommandButton yang sudah Anda buat sebelumnya untuk langsung menuju jendela Microsoft Visual Basic Editor (catatan; pastikan tombol Design Mode yang terdapat di Menu Developer dalam keadaan Aktif)
    Dim Data As Variant
    Dim i As Long

    Data = Range("A2:B" & Cells(Rows.Count, "A").End(xlUp).Row)
    ListBox1.Clear
    For i = 1 To UBound(Data)
    If Data(i, 2) = "OK" Then
    With Me.ListBox1
       .AddItem Data(i, 1)
       .List(.ListCount - 1, 1) = Data(i, 2)
    End With
    End If
    Next i

    Dari baris kode diatas dapat dilihat bahwa data yang terdapat di dalam lembar kerja Microsoft Excel akan dibaca terlebih dahulu yang terdapat dalam baris Range("A2:B" karena dalam tutorial ini data mulai terisi di baris A2 hingga B sekian, sementara untuk kriteria berada di kolom status atau kolom B dengan nilai OK.

    Jika Anda ingin menghapus atau membersihkan daftar atau isian yang terdapat dalam ListBox, maka dapat dilakukan dengan cara menambahkan satu buah CommandButton dan berikan sebuah perintah atau baris kode Listbox1.Clear

    Catatan :
    Pastikan Ikon Design Mode yang terdapat dalam Menu Developer sudah tidak Aktif agar tombol CommanButton bisa menerima dan menjalankan perintah yang sudah dibuat diatas.








    Menyalin Data Duplikat Dalam Lembar Kerja Excel Dengan Macro VBA

    Salah satu kelebihan dari Microsoft Excel adalah kemampuannya dalam memasukkan data hampir sekitar 1 juta (secara vertikal atau berdasarkan baris), yang ini tentunya asangat berpotensi menghasilkan nilai ganda atau duplikat atau nama lainnya adalah dobel....hehehe

    Memang dalam aplikasi Microsoft Excel sudah menyediakan sebuah fitur untuk mencegah pengguna dalam mengentry atau memasukkan data agar tidak sama antar satu dengan yang lainnya, yang mana hal ini bisa dilakukan salah satunya dengan menggunakan Conditional Formatting atau Data Validation.

    Dalam artikel kali ini, excelive tidak akan membahas bagaimana cara mencegah data ganda atau memaksa pengguna agar tidak bisa memasukkan data ganda karena saya yakin tutorial semacam ini sudah banyak yang membahasnya.
    Tujuan dari tutorial ini adalah menyalin data duplikat dari sekumpulan data-data yang sudah ada menggunakan Macro VBA, jadi pastikan jendela Microsoft Visual Basic Editor sudah dalam posisi aktif atau terbuka. Untuk lebih jelasnya, silahkan lihat tutorial ini.

    Sebagai contoh, lihat sekumpulan data (berisi data ganda) berikut :
    Data Duplikat

    Dari sekumpulan data-data diatas, yang sama diwarnai dengan warna merah adalah data yang sama (duplikat).

    Untuk mencari data duplikat, maka yang terlebih dahulu dilakukan adalah membuat sebuah module dengan isi seperti berikut :
    on error resume next
    Dim SelAwal As Range, duplikat As Object, hasil_duplikat As Object
    Dim Data_Duplikat As Variant, i As Long, j As Long

    Set duplikat = CreateObject("Scripting.Dictionary")
    Set hasil_duplikat = CreateObject("Scripting.Dictionary")

    Set SelAwal = [A3]

    Data_Duplikat= SelAwal.CurrentRegion.Value
    For i = LBound(Data_Duplikat, 1) To UBound(Data_Duplikat, 1)
    If duplikat.Exists(Data_Duplikat(i, 1)) Then
    hasil_duplikat(Data_Duplikat(i, 1)) = Empty
    Else
    duplikat(Data_Duplikat(i, 1)) = Empty
    End If
    Next i


    Baris kode di atas berfungsi untuk mencari data yang sama atau ganda dari sekumpulan data yang sudah dibuat. Untuk tutorial ini, pembacaan diawali dari baris atau sel A3 (baris kode Set SelAwal = [A3]). Sementara untuk melihat data-data yang ada, menggunakan CurrentRegion untuk memudahkan pembacaan isi sel yang dimaksud. Untuk lebih jelasnya menggunakan Macro VBA CurrentRegion lihat disini.

    Langkah terakhir adalah menyalin hasil data duplikat ke sel lain dan untuk melakukannya masih menggunakan bantuan Macro VBA, seperti berikut :
    With [C3].Resize(hasil_duplikat.Count)
    .Value = Application.Transpose(hasil_duplikat.keys)
    .Sort key1:=.Cells(1), order1:=xlAscending
    End With

    Baris kode ini bertugas untuk menyalin hasil data ganda yang ditemukan dari kode sebelumnya, dengan spesifikasi sebagai berikut :
    • Menuliskan data ganda mulai dari sel C3
    • Hasil data ganda akan diurutkan dari yang terkecil
    Hasil akhir dari serangkaian kode diatas untuk menyalin data ganda, ditampilkan dalam visualisai berikut :

    Menyembunyikan Nilai 0 (Nol) Di Dalam Grafik Excel

    Microsoft Excel merupakan aplikasi untuk mengolah data secara otomatis yang dapat berupa perhitungan dasar, rumus, pemakaian fungsi-fungsi, pengolahan data dan tabel, pembuatan grafik dan menajemen data.

    Secara umum Microsoft Excel yang sudah tak asing lagi dalam kehidupan kita sehari-hari, memiliki banyak sekali fungsi antara lain:
    1. Membuat sebuah laporan keuangan
    2. Membuat Daftar Nilai
    3. Membuat daftar hadir
    4. Melakukan operasi kali, bagi, rerataan dengan cepat
    5. Menghitung Kurs Mata Uang
    6. Membuat Grafik dan Tabel dari suatu penghitungan
    7. Membuat diagram batang,diagram garis dan diagram lingkaran
    8. Membantu kita dalam menyelesaikan soal-soal logika dan matematika
    9. Membuat presentasi jadi lebih praktis dan mudah
    10. Menyajikan data secara tepat, rapi, dan akurat
    11. dll
    Dalam artikel kali ini, excelive akan fokus pada materi tentang grafik atau Chart.

    Grafik adalah lukisan dengan gambar/garis untuk mengetahui naik turunnya suatu keadaan data yang ada dengan tujuan antara lain:
    1. Menyediakan data dengan lebih menarik
    2. Dapat mengetahui naik turunya suatu keadaan data
    3. Menyajikan data yang dapat lebih mudah di pahami
    Di dalam aplikasi Microsoft Excel, telah tersedia berbagai macam jenis grafik yang memiliki tampilan serta tujuan yang berbeda-beda sesuai dengan keinginan dari pengguna.

    Meskipun tema dari tutorial kali ini tentang grafik, akan tetapi kita tidak akan membahas bagaimana cara membuat atau menyajikan data dalam bentuk grafik, akan tetapi bagaimana kita 'menghilangkan' angka 0 (nol) agar tidak ditampilkan ketika di dalam sebuah grafik.

    Lihat grafik standard dari data-data berikut :

    grafik standard

    Dari data diatas, terdapat beberapa nilai yang berisi 0 (nol) sehingga ketika ingin menampilkan data label dalam sebuah grafik maka nilai 0 (nol) akan tetap ditampilkan (lihat gambar di atas).

    Hal ini bukanlah sebuah kesalahan, karena Microsoft Excel tetap menganggap bahwa nilai 0 (nol) adalah sebuah angka yang tetap akan ditampilkan ketika kita mengaktifkan data labels dalam grafik yang kita buat.

    Jika Anda merasa terganggu dengan angka 0 (nol) yang tetap ditampilkan dalam grafik yang Anda buat, maka gunakan trik berikut:
    • Sorot data yang Anda jadikan sebagai sumber grafik
    • Klik kanan data yang Anda sorot dan pilih perintah Format Cells dari menu yang ditampilkan, atau bisa juga menggunakan tombol pintas Ctrl + 1
    • Di dalam jendela Format Cells, pilih tab Number dan pilih Custom dari menu Category
    • Silahkan ketikkan 0;; di dalam kotak Type:
    Tampilan grafik yang menyembunyikan Data Labels dari data-data berisi nilai 0 (nol)

    Menyembunyikan nilai 0 dalam grafik

    Menghapus Spasi Antar Teks Yang Tidak Beraturan Dengan Macro VBA

    Spasi keyboard
    Spasi adalah daerah kosong yang digunakan sebagai pemberi jarak dan pemisah kata, huruf, angka, atau tanda baca. Konvensi pemberian jarak antarkata dan antarkalimat bervariasi dalam berbagai bahasa dan kadang cukup kompleks.

    Penggunaan spasi atau jarak sangatlah penting untuk memisah antar kata untuk menghasilkan sebuah makna tertentu. Bahkan, bisa dibilang sebuah keharusan. Bagaimana tidak, coba saja Anda bayangkan jika website ini ditulis tanpa menggunakan spasi, pastinya Anda akan sangat tidak nyaman bukan. Atau, mungkin penggunaan spasi sebagai pemisah antar kata yang sangat tidak beraturan - pasti akan membuat tulisan terlihat tidak rapi dan tidak nyaman di baca.

    Coba perhatikan penulisan berikut :
    spasi baris

    Saya yakin, baik Anda ataupun saya, akan sangat nyaman dalam membaca tulisan yang menggunakan spasi atau model penulisan yang terdapat di nomor 2.

    Akan tetapi, barangkali kita pernah mendapati sebuah tulisan yang mana jarak antar kata atau spasi-nya sangat tidak beraturan (seperti yang terdapat di nomor 3), yang biasanya kita dapatkan ketika kita copy-paste sebuah artikel dari sebuah website.

    Nah, jika Anda mendapati kasus seperti ini di lembar kerja Microsoft Excel Anda, maka solusinya adalah meminta bantuan Macro VBA untuk merapikan spasi antar kata yang sangat tidak beraturan tersebut. Langkahnya adalah sebagai berikut :
    1. Buka jendela Microsoft Visual Basic Editor
    2. Buat sebuah Module Baru
    3. Ketikkan atau masukkan baris kode berikut kedalamnya
      Sub HapusSpasi()
      Dim Rg As Range
      Set Rg = Application.InputBox("Select a range", "Obtain Range Object", Type:=8)
      Rg.Select

      With Rg
         .Value = Evaluate("IF(ISTEXT(" & .Address & "),TRIM(" & .Address & "),REPT(" & .Address & ",1))")
      End With
      End Sub

    4. Langkah terakhir adalah, silahkan uji susunan kode ini dengan menekan tombol F5
      Hasil hasil tutorial
      Merapikan spasi antar kata di excel

    Catatan:
    Sebelum merapikan spasi antar kata, pengguna diharuskan terlebih dahulu menentukan sel atau range yang terdapat kalimat yang ingin dirapikan, kemudian diakhiri dengan tombol OK.
    Hallo, mau belajar excel. Di sini tempatnya. -
    Tutorial Microsoft Excel

    Join excelive newsletter now...