You've probably noticed

We love Excel

Author

When some user experience severe excel problem, it is not uncommon for their job activity to disturbed.
My great passion is bringing solution to some user who have been trought those experience, so they can save their times fixing excel issues.

  • myexcelive@gmail.com
  • www.excelive.com
  • READ MORE
Me

What will you get here

We have been work hard to bringing something useful for you in order to help your excel issues

Macro VBA 70%
Formula Excel 45%
Tips and Tricks 15%
Miscellaneous 25%

Expertise

We share the tutorials that we ourselves have tested in the workplace and slightly refine it to make it easy for you

Our Article

Every article on this site is presented explicitly so that you can understand the purpose of each tutorial.

Efficiency

We provides examples of just for illustration only, and we do not guarantee that they can be used in all situations.

Installation

every each codes on this site are provided "as is" and are easy to install

Youtube

in order to facilitate you in learning excel, you can visit our channel here

Design

all the design of each tutorial has passed the test for excel 2007 up

  • Cara membuat penomoran transaksi diawali dengan 000 menggunakan formula TEXT

    nomor transaksi Bila kita perhatikan struk belanja di supermarket ataupun toko, atau nota pembelian, kita akan melihat sebuah nomor transaksi penjualan di dalam struk tersebut. Nomor transaksi tersebut biasa digunakan sebagai nomor bukti transaksi. Pencantuman nomor transaksi, tentu punya tujuan. Nomor itu sangat berguna bagi pemilik ataupun pihak manajemen dalam hal pelacakan transaksi. Umumnya nomor transaksi biasanya diawali angka terkecil dan biasanya pula ditampilkan dalam digit angka ribuan atau bahkan mungkin jutaan. Sebagai contoh nomor transaksi 15 maka akan ditampilkan dengan angka 0015 atau 0000015 tergantung dari kebutuhan.

    Sebenarnya sistem penomoran diatas, tidak ada bedanya dengan penomoran pada umumnya hanya saja dengan cara ini nomor transaksi akan tampil lebih konsisten karena jumlah digit yang digunakan memiliki panjang sama. Dari susunan tabel penyimpanannya juga tidak ada perbedaan, jadi semuanya memang murni tampilanya saja.

    Membuat sistem penomoran model seperti ini menggunakan Microsoft Excel tentu bukanlah sebuah hal yang sulit untuk dikerjakan, akan tetapi bagi anda yang belum mengetahui bagaimana caranya, serta formula apa yang dibutuhkan untuk membuat tampilan nomor seperti ini, silahkan pilih salah satu dari dua model berikut yang sesuai dengan kebutuhan anda:

    HardCoded
    Yang dimaksud dari Hardcoded di sini adalah, anda menentukan jumlah digit yang ingin ditampilkan dan ditulis dalam formula secara manual. Untuk formulanya bisa dtulis seperti ini
    Formula Excel
    =TEXT(B2;"000000")

    Repeat Number
    Teknik yang ini membutuhkan sejumlah angka yang dijadikan sebagai banyaknya jumlah digit yang ingin ditampilkan, dan tentu saja bisa rubah secara otomatis tanpa harus merubah susuan formula yang sudah ditulis. Dan formulanya adalah sebagai berikut
    Formula Excel
    =TEXT(B2;REPT("0";B1))
    Kedua formula di atas merubah sistem penomoran yang terdapat di sel B2 memiliki jumlah digit sejumlah angka 0 (nol) yang ditulis atau diulangi.

    Format Cells
    Dan tentu saja bagi anda yang tidak ingin ribet dengan menggunakan formula, cara ini bisa dilakukan dengan cukup mudah dengan mengatur format sel, caranya adalah sebagai berikut :
    1. Pilih sel yang anda inginkan, misalnya sel B6
    2. Kemudian klik kanan pada sel tersebut, atau bisa juga anda akses dengan cara menekan tombol Ctrl+1
    3. Pada jendela Format Cells, pilih tab Number dan pilih Category: Custom, selanjutnya silahkan tulis format angka di kotak Type: seperti ini 000000# jika anda ingin menampilkan jumlah digit jutaan.
      format cells
    4. Akhiri dengan tombol OK

    Silahkan lihat dan bandingkan masing-masing trik di atas di hasil akhir dari tutorial ini:
    membuat numerator di excel

    Selamat... anda sudah berhasil mengetahui 3 (tiga) cara membuat penomoran transaksi diawali dengan angka 000 secara otomatis.
    Terimakasih sudah berkunjung, semoga tutorial kali ini bermanfaat untuk anda. Gracias
  • Panduan Lengkap Menyusun Daftar ListBox Sesuai Abjad Dari Data Acak

    mengurutkan abjad Salah satu Control VB yang dapat menampilkan nilai atau data-data yang ada dalam lembar kerja yang berfungsi untuk mempermudah pengguna dalam memlihnya adalah ListBox. Ia akan menampilkan apa yang ada di lembar kerja Microsoft Excel sesuai dengan urutan yang semestinya. Akan tetapi dengan memberikan sedikit sentuhan dari standar kode VBA, kita akan mampu menyusun ulang daftar di ListBox secara berurutan tanpa harus merubah urutannya di lembar kerja.

    Sebenarnya cara ini adalah trik akhir yang bisa dilakukan jika anda melakukan 'kesalahan' dalam menyusun data-data dalam lembar kerja yang tidak diurutkan berdasarkan abjad namun tetap memaksa menampilkan secara berurutan ke dalam ListBox. Karena bagaimanapun juga, trik ini akan mempengaruhi kinerja atau kecepatan loading sebuah ListBox. Dengan kata lain, jika ingin mengurutkan daftar ListBox berdasarkan abjad maka ada baiknya mengurutkan data-data yang terdapat di dalam lembar kerja terlebih dahulu sebelum menampilkannya.

    Oke, kita akan mulai dengan menyiapkan data-data dilembar kerja yang disusun secara acak seperti tampilan berikut :
    data sort lembar kerja

    Selanjutnya buka Microsoft Visual Basic Editor dengan cara menekan tombol Alt+F11 dan kita mulai membuat design UserForm yang didalamnya memuat sebuah ListBox untuk menampilkan data-data dan sebuah CommandButton untuk memanggil data dari lembar kerja dan kemudian menyusunnya secata berurutan berdasarkan abjad.
    design userform dan listbox

    Setelah selesai mendesain, kini saatnya menulis serangkaian kode Macro VBA untuk mengurutkan data secara otomatis. Caranya klik ganda CommandButton untuk langsung menuju jendela kode, selanjutnya copy - paste kode berikut ke dalamnya
    Dim i As Long
    Dim j As Long
    Dim xx As Long
    Dim Temp As Variant
    With ListBox1
        xx = Worksheets("Sheet1").Cells(Rows.Count, "A").End(xlUp).Row
        For s = 1 To xx
            .AddItem Cells(s, 1)
        Next s
        
        For i = 0 To .ListCount - 2
            For j = i + 1 To .ListCount - 1
                If .List(i) > .List(j) Then
                    Temp = .List(j)
                    .List(j) = .List(i)
                    .List(i) = Temp
                End If
            Next j
        Next i
    End With

    Untuk mengujinya, silahkan anda tekan tombol F5 di keyboard atau bisa juga anda klik icon yang ada di menubar. Dan hasil akhir akan tampak seperti berikut :
    sort listbox

    Selamat, Anda sudah berhasil mengurutkan daftar ListBox dari data acak yang berasal dari lembar kerja secara otomatis berdasarkan susunan abjad.
    Terimakasih sudah berkunjung, semoga tutorial kali ini memberikan manfaat Thanks for visiting


  • Memilih Isi Daftar ListBox Dengan Menggunakan Tombol Enter

    Fill Form ListBox Jika masih bertanya tentang bagaimana cara mengisi daftar ListBox, maka silahkan lihat beberapa tutorial terkait cara mengisi ListBox - karena saya tidak akan menjelaskannya di postingkan kali ini agar bisa lebih fokus terhadap tutorial yang akan kita bahas saja.

    Oke, saya berasumsi bahwa anda sudah cukup mahir mengisi daftar-daftar ListBox yang bisa anda pelajari melalui link yang sudah saya sediakan di atas. Selanjutnya adalah, kita akan mencoab memilih daftar-daftar yang terdapat dalam ListBox dengan menggunakan tombol Enter dan menampilkan informasi yang terkait dengan data tersebut.

    Sebelumnya, silahkan buat sebuah tabel yang berisi data-data yang diletakkan di sebuah lembar kerja untuk nantinya diletakkan di ListBox. Dan untuk tutorial ini, saya sudah menyiapkan data sebagai berikut:
    nama karyawan

    Jika anda perhatikan, maka daftar yang tampil di ListBox harusnya persis seperti apa yang tertulis di lembar kerja, yakni sejumlah 3 kolom dan berisi 5 buah baris yang memuat nama-nama karyawan. Sehingga jika di desain dalam sebuah UserForm maka akan terlihat seperti berikut :
    Daftar ListBox
    Dari tampilan di atas, terdapat sebuah kotak yang terdapat di sebelah ListBox. Kegunaan dari kotak ini (TextBox) adalah sebagai tempat untuk menampilkan informasi dari setiap baris atau nilai yang dipilih di ListBox, juga bisa digunakan sebagai tempat untuk merubah data yang terkait dengan daftar yang terpilih.

    Untuk langkah selanjutnya adalah kita menuliskan serangkaian baris kode berikut
    Kode UserForm
    Untuk menempatkan kode berikut ini, silahkan klik kanan objek UserForm yang sudah didesain kemudian pilih view code untuk langsung menuju jendela kode. Selanjutnya copy paste kode berikut ini yang sudah dilengkapi dengan even dan prosedur untuk masing-masing kontrol
    Private Sub UserForm_Activate()
    ListBox1.RowSource = "A2:C6"
    ListBox1.ListIndex = 0
    End Sub
    '--------------
    Private Sub ListBox1_Click()
    TextBox1 = ListBox1.Column(2)
    TextBox1.SetFocus
    End Sub
    '--------------
    Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
    If KeyCode = 13 Then
    If ListBox1.ListIndex + 1 = ListBox1.ListCount Then
        Cells(ListBox1.ListIndex + 2, 3) = TextBox1
        If MsgBox("Anda sudah berada di daftar paling akhir" & vbCr & _
               "Klik tombol YES jika ingin mengulang dari awal", vbYesNo) = vbYes Then
            ListBox1.ListIndex = 0
            TextBox1.SetFocus
            Call aa
            Else
            Call aa
        End If
        Else
        Cells(ListBox1.ListIndex + 2, 3) = TextBox1
        ListBox1.ListIndex = ListBox1.ListIndex + 1
        Call aa
        tb1 = ""
    End If
    End If
    End Sub
    
    Penjelasan singkat rangkaian kode di atas :
    • Menentukan isi daftar ListBox yang berasal dari range A2:C6 serta memilih daftar pertama yang terdapat di ListBox. Dua baris kode ini akan berjalan otomatis ketika UserForm dibuka
    • Disaat yang bersamaan pula, ketika isi ListBox terpilih maka kursor otomatis menuju kotak TextBox
    • Ketika kursor sudah berada di dalam kotak TextBox maka selanjutnya even yang saya pilih adalah KeyDown, artinya ketika pengguna menekan tombol-tombol yang terdapat di keyboard maka akan menjalankan perintah sebagai berikut :
      • Menentukan tombol yang hanya berlaku untuk even ini adalah tombol ENTER (keycode = 13)
      • Jika ternyata urutan daftar yang terpilih adalah sama dengan jumlah banyaknya daftar yang ada dalam ListBox, maka sebuah jendela informasi akan muncul. Dijendela informasi ini juga saya menyematkan sebuah logika yang bertujuan apakah pengguna ingin mengulangi dari awal atau tidak
      • Jika urutan daftar yang terpilih bukan data terakhir maka perintah atau kode yang akan dieksekusi adalah kode aa yang berikutnya saya tulis dalam sebuah module
    Setelah anda selesai menulis baris kode untuk UserForm, sekarang saatnya menuliskan kode di dalam module.

    Kode Module
    untuk meletakkan kode ini, maka yang harus anda lakukan terlebih dahulu adalah dengan membuat module baru dengan cara klik menu Insert kemudian klik Module, selajutnya copy-paste kode ini di dalamnya
    Sub aa()
    Application.OnTime Now + TimeValue("00:00:01"), "bb"
    End Sub
    '--------------
    Sub bb()
    With UserForm1
        .TextBox1.SetFocus
        .TextBox1 = .ListBox1.Column(2)
    End With
    End Sub

    Jika anda mengikuti langkah-langkah di atas secara tepat, hasil yang akan anda dapatkan ketika menekan tombol di menubar, maka akan tampak seperti tampilan berikut:
    memilih listbox dengan enter

    Selamat...anda sudah berhasil memilih item-item yang terdapat di dalam daftar ListBox dengan menggunakan tombol Enter yang terdapat di keyboard, juga anda bisa langsung merubah informasi yang terkait dengan item tersebut melalui kotak TextBox yang tersedia.
    semoga tutorial yang cukup singkat ini memberikan manfaat untuk anda. Adios

  • Begini Cara Mengisi ComboBox Dari Berbagai Item Melalui TextBox

    entri daftar comboBox Jika dilihat dari judul artikel ini, barangkali anda sudah bisa menebak control-control apa saja yang dibutuhkan agar berhasil menjalankan kode yang akan kita bahas pada kesempatan kali ini. Ya, setidaknya ada dua buah control utama yang kita butuhkan yakni ComboBox dan TextBox yang masing-masing diletakkan dalam sebuah UserForm.

    Kenapa harus ComboBox? apakah bisa digunakan pada ListBox?!

    Tentu saja bisa, hanya saja untuk tutorial ini saya akan lebih fokus pada ComboBox karena sebenarnya Control ComboBox merupakan kombinasi dari TextBox dan kontrol ListBox, namun item yang ditampilkan hanya berjumlah satu pada saat diaktifkan dan item lain yang tersedia dimuat dalam daftar drop-down (belum dipilih/diaktifkan).

    Oke, kembali ke materi tutorial cara mengisi ComboBox dari berbagai item, namun sebelumnya saya akan sedikit menjelaskan tentang Fungsi Array dalam kode Macro VBA. Array adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang sama. Array merupakan konsep yang penting dalam pemrograman, karena array memungkinkan untuk menyimpan data maupun referensi objek dalam jumlah banyak dan terindeks.

    Contoh menggunakan ARRAY dalam Macro VBA bisa anda temukan disini
    Menggunakan UBound - LBound
    Mengisi ListBox dari Array Data
    Dalam Array Macro VBA Excel juga kita mengenal istilah dimensi atau bahasa yang mudah dipahami adalah urutan dalam Array yang dipisahkan dengan tanda koma. Perhatikan penulisan Array berikut
    Film = Array("Action", "Comedy", "Drama", "Horror")
    Secara berurutan, dari Action sampai dengan Horror semua dinyatakan dalam nama variabel yang sama yakni Film, dan terdiri dari 4 dimensi.

    Coba perhatikan bahasa kode sederhana Macro VBA untuk menampilkan pesan dari kode Array berikut :
    Sub Test
    Film = Array("Action", "Comedy", "Drama", "Horror")
    MsgBox Film(2)
    Dan hasil yang didapatkan dari kode ini adalah jendela pesan seperti berikut :
    Menampilkan informasi dari array
    Kenapa yang muncul urutan ke-3, padahal indeks yang ditulis dalam MsgBox adalah 2 ?
    Hal ini karena urutan indeks dimulai dari angka 0 (nol) dan untuk contoh di atas diakhiri dengan indeks angka 3 (tiga). Inilah yang menyebabkan "Drama" yang muncul dalam jendela kotak pesan dan bukan "Comedy".

    Dengan memahami konsep Array, maka modal dasar sudah anda pegang dan siap mengikuti dan melanjutkan tutorial ini. Namun sebelumnya, siapkan dulu sebuah UserForm disertai dengan ComboBox dan TextBox seperti tampilan berikut :
    Design Fungsi Array VBA
    Setelah berhasil men-design UserForm, selanjutnya silahkan klik dua kali control TextBox1 untuk langsung menuju ke jendela kode dan lanjutkan dengan memasukkan serangkaian baris kode berikut :
    On Error GoTo x
    Dim Film As Variant
    Dim i As Long
    
    Film = Array("Action: Comedy: Drama: Horror:", _
                "Avenger DeadPool Forever-My-Girl Annabelle", _
                "Iron-Man BayWatch Every-Day The-Nun", _
                "Skyscrapper Shaun-The-Dead Midnight-Sun The-Conjuring")
    ComboBox1.Clear
       For i = 0 To UBound(Film)
          ComboBox1.AddItem Split(Film(i))(TextBox1)
       Next i
       
    Exit Sub
    x:
    TextBox1.SetFocus
    MsgBox "Dimensi tidak tersedia, atau nilai yang dimasukkan error"
    
    Secara singkat, penjelasan kode sebagai berikut
    • Kode diawali dengan sebuah Error Trap yang berfungsi jika terdapat terdapat kesalahan maka kode yang akan dieksekusi adalah parameter x
    • selanjutnya adalah menentukan jenis data untuk variabel Film yakni sebagai Variant.Variabel Film ini berisi 4 buah dimensi yang ditandai dengan pembatas koma serta diapit dengan tanda petik dua serta memiliki masing-masing 4 buah item yang dipisahkan dengan spasi. Inilah data-data yang nantinya akan dipanggil berdasarkan nilai yang tertulis di TextBox.
    • Kode berikutnya adalah membersihkan data-data yang ada di ComboBox. Hal ini bertujuan agar nantinya data tidak mengalami percampuran setiap kali ada perubahan di TextBox1
    • Selanjutnya adalah menjalankan perintah looping dengan menggunakan metode UBound yang berfungsi untuk mengambil data-data yang terdapat di variabel Film.
    • Kunci dari tutorial ini terletak pada baris kode yang terdapat di dalam perintah looping, yakni proses menambahkan item di ComboBox tapi menggunakan Teknik Split dari variabel Film sesuai dengan urutan yang ditulis di TextBox1

    Jika anda mengikuti dan tidak melewati langkah-langkah di atas, maka anda akan mendapatkan hasil akhir tutorial seperti tampilan berikut ini:
    memilih listbox dengan enter


    Selamat... anda sudah berhasil mengambil kumpulan data-data yang bervariasi dari sebuah Array untuk ditempatkan ke dalam ComboBox melalui berdasarkan nilai yang dimasukkan dalam sebuah TextBox. Semoga tutorial yang cukup singkat ini dapat memberi wawasan baru.
    Jangan lupa, silahkan share link ini jika apa yang kami tulis bermanfaat untuk anda. Gracias


  • Cara Membuat Komentar Sel Berdasarkan Isinya Secara Otomatis

    insert comment in excel Ada cara mudah untuk mengetahui status sel, apakah ia berisi catatan tambahan atau yang lebih umum disebut dengan komentar atau tidak, karena Excel sudah memberikan perbedaan dari sisi tampilannya yakni sel yang berisi komentar memiliki tanda segitiga warna merah yang berada di pojok kanan atasnya. Hal ini tentu bisa sangat mempermudah pengguna untuk mengetahui bahwa sel tersebut pasti berisi informasi tambahan yang dimiliki oleh sel tersebut.

    Informasi tambahan ini bisa dibilang cukup efektif dalam memberikan informasi kepada pengguna tentang isi dari sel tersebut tanpa harus menuliskannya di sel-sel lainnya. seperti, informasi tentang cara menginput nilai, bagaimana dan dari mana isi sel itu didapatkan, formula yang terdapat di dalamnya, dari mana data di input, hingga informasi lainnya yang sifatnya hanya untuk sekedar mengingatkan pengguna lainnya. Dengan demikian, orang lain dapat memahami maksud isi sel tersebut dengan baik.

    Menuliskan komentar untuk sebuah sel-pun sangatlah mudah dilakukan dan hampir setiap pengguna bisa membuatnya, yakni tinggal klik kanan sel yang ingin diberi informasi tambahan, kemudian di menu Pop-Up yang muncul kita tinggal pilih perintah Insert Comment dan langsung bisa mengetikkan informasi yang diinginkan di kotak komentar.
    cara memberi komentar di sel

    Cara ini adalah cara yang biasa dilakukan secara manual. Artinya pengguna harus melakukan beberapa rangkaian aksi agar bisa membuat komentar terhadap sel yang dimaksud, sehingga hal ini tentu saja membutuhkan kejelian untuk memilih sel mana yang harus diberi catatan tambahan, terlebih jika anda mempunyai kriteria isi sel yang memiliki nilai tertentu saja yang harus dibuatkan komentar, ambil contoh seperti ini
    Ketika pengguna mengetik sebuah nilai yang berisi teks seperti, keren, oke, dan excel, maka sel-sel tersebut akan otomotis menampilkan catatan tambahan atau komentar berupa judul komentar dan isi dari sel tersebut, sementara jika nilai dalam sel tersebut selain dari kriteria yang disebutkan, maka status komentar akan dihapus
    Menyisipkan komentar secara otomatis seperti skenario di atas hanya bisa dilakukan menggunakan bantuan Macro VBA dengan menggunakan even Worksheet.Change, Hal ini karena disana terdapat sebuah aksi pengguna mengetik nilai kemudian komentar akan muncul jika sesuai dengan kriteria yang disebutkan.

    Bagaimana membuatnya?!...Jika anda sudah siap, silahkan ikuti panduannya berikut:
    1. Buka jendela Microsoft Visual Basic Editor
    2. Tentukan lembar kerja mana yang akan anda otomatisasi penulisan komentarnya. Ambil contoh, lembar kerja yang akan diotomatisasi adalah lembar kerja atau Sheet1, maka yang perlu anda lakukan adalah klik ganda objek Sheet1 yang ada di jendela VBAProject, kemudian klik even Worksheet dan prosedurnya pilih Change.
      sheet1 worksheet change
    3. Selanjutnya, copy-paste kode berikut ke dalam even yang sudah anda buat dilangkah sebelumnya
      On Error Resume Next
      If Target.Cells Like "*oke*" Then
      Target.ClearComments
      Target.AddComment "Satu :" & vbNewLine & Target.Value
          ElseIf Target.Cells Like "*keren*" Then
          Target.ClearComments
          Target.AddComment "Dua :" & vbCrLf & Target.Value
              ElseIf Target.Cells Like "*excel*" Then
              Target.ClearComments
              Target.AddComment "Tiga :" & vbCrLf & Target.Value
          Else
          Target.ClearComments
      End If
      Penjelasannya kurang lebih seperti berikut :Perintah diawali dengan statement Error, artinya jika terjadi kesalahan akan diabaikan. Selanjutnya adalah serangkaian logika IF bertingkat yang kondisinya sebagai berikut :
      • Setiap sel yang berisi teks (baca:kriteria) seperti, keren, oke, dan excel yang dikombinasikan dengan menggunakan wildcard, maka akan berisi komentar secara otomatis
      • jika ternyata sel-sel yang ditulis terdapat teks seperti di atas maka komentar sebelumnya maka akan dihapus (ClearComments) dan akan diganti dengan komentar baru
      • Komentar yang beru berisi kata-kata yang terdapat di baris AddComment dan dibaris berikutnya ditulis sesuai dengan isi sel yang memuat kriteria di atas
      • Statement untuk menambahkan baris baru adalah vbCrLf
      • Kriteri yang ditulis sifat adalah Case-Sensitive
    Tutorial sejenis ini bisa anda lihat dipembahasan tentang mewarnai sel dan font berdasarkan isi sel .

    Untuk menyempurnakan pembelajaran kali ini, seperti biasa saya akan memperlihatkan rangkaian kode yang telah dibuat dan bagaimana perubahan yang terjadi di lembar kerja
    memilih listbox dengan enter

    Selamat... anda sudah berhasil membuat komentar muncul secara otomatis ketika mengetikkan teks tertentu di lembar kerja, semoga memberikan manfaat untuk anda.
    Jangan lupa bookmark situs ini agar memudahkan anda dalam mengunjunginya lain waktu. Thanks for visit us

    Tutorial ini memuat Macro VBA, jadi pastikan hasil akhir dari tutorial ini disimpan menggunakan format Excel Macro-Enable Workbook
    .xlsm
    atau Excel Binary Workbook
    .xlsb


  • Cara Menyembunyikan Baris (Hidden) Jika Menghasilkan Nilai 0 Dari Hasil Vlookup

    auto row hidden Formula VlookUp merupakan salah satu dari sekian formula dasar yang sering digunakan dalam mengerjakan tugas-tugas keseharian terkait dengan microsoft excel. Seperti yang sudah diketahui bahwa salah satu fungsi dari formula ini adalah untuk mencari data pada kolom pertama sebuah tabel data, kemudian mengambil nilai dari sel mana pun di baris yang sama pada tabel data tersebut.

    Dengan rumus Vlookup pada Microsoft Excel ini kita dapat mengisi data pada sebuah tabel berdasarkan data pada tabel referensi lain (baca: tabel bantu) dengan menggunakan sebuah nilai kunci yang spesifik atau yang disebut dengan LookUp Value.

    Coba perhatikan data yang saya miliki berikut ini
    data karyawan - vlookup
    Saya yakin anda pasti dapat dengan mudah menuliskan formula VlookUp untuk menampilkan informasi-informasi terkait Data Karyawan seperti gambar di atas.

    Syntax umum penulisan Rumus VlookUp untuk tutorial ini bisa ditulis seperti berikut:
    Fungsi VLOOKUP
    =VLOOKUP(E1;TabelBantu;2)
    Penjelasan singkat formula iniFormula ini bisa ditulis di sel C4 sampai dengan sel C7 dengan ketentuan sebagai berikut:
    1. E1 adalah LookUp Reference atau kunci yang digunakan untuk menampilkan informasi
    2. TabelBantu adalah sebuah Name Range yang saya tentukan dari sel B12:F17. Tujuannya tidak lain adalah untuk mempermudah dalam penulisan rumus
    3. Angka 2 (dua) adalah sebuah indeks kolom dari Tabel Bantu yang akan ditampilkan ke dalam Data Karyawan (silahkan ganti angka ini untuk melihat informasi di kolom lainnya)

    Dengan menuliskan rumus seperti di atas, maka setiap perubahan informasi Data Karyawan akan terlihat jika kita merubah nilai di sel E1.
    Sampai disini anda sudah berhasil menampilkan informasi menggunakan rumus VlookUp. Namun tampak ada 'sesuatu' yang kurang sempurna, apa itu? yakni adanya nilai 0 yang dihasilkan oleh rumus VlookUp yang ditampilkan.

    Hal ini terjadi bukan berarti rumus yang ditulis salah, melainkan kurang lengkapnya informasi yang ada di TabelBantu. Coba anda perhatikan informasi Nama Karyawan atas nama Dicky, disana tampak bahwa kolom Dept dan kolom Yr belum diisi. Inilah yang menyebabkan munculnya nilai 0 dari hasil formula VlookUp.
    Silahkan anda baca tutorial cara menghilangkan Angka 0 dari hasil VlookUp

    Bagaimana jika informasi yang ada di tabel bantu memang seperti itu?!, rumus atau formula apa yang harus digunakan untuk menyembunyikan setiap baris yang memuat angka 0 tersebut?
    Saya katakan tidak ada rumus atau formula excel yang bisa melakukannya, dan salah satu solusinya adalah anda harus menggunakan Macro VBA untuk menyelesaikan masalah ini.
    Silahkan ikuti panduan berikut untuk menyembunyikan baris yang memuat angka 0 (nol) dari hasil yang didapatkan oleh Formula VLookUp secara otomatis.
    1. Langkah ini ada baiknya dilakukan setelah anda selesai menentukan dan menuliskan formula VlookUp seperti di atas
    2. Selanjutnya adalah buka jendela Microsoft Visual Basic Editor dengan menekan tombol Alt+F11
    3. Saya berasumsi bahwa pekerjaan ini di lakukan di lembar kerja pertama atau Sheet1, maka yang selanjutnya dilakukan adalah klik ganda objek Sheet1 yang terdapat di jendela VBAProject (sebelah kiri atas) untuk bisa menampilkan jendela kode untuk lembar kerja ini.
      Selanjutnya adalah memilih objek Worksheet dan prosedur Change pada masing-masing menu Dropdown. Lihat gambar berikut:
      perubahan pada sheet1

      Baca tutorial terkait lain
      Membuat komentar sel berdasarkan isinya secara otomatis
      Merubah warna interior dan font pada sel tertentu
      Cara mengatur tinggi baris sebuah sel secara otomatis
    4. Sampai dengan langkah ini, anda sudah berhasil menentukan sebuah kode yang akan dijalankan ketika terjadi perubahan terhadap setiap sel yang ada di Sheet1.
      Langkah selanjutnya tentu saja menuliskan kode Macro VBA agar menjalankan perintah untuk menyembunyikan baris.
    5. Tuliskan kode berikut ke dalam kode yang masing kosong yang berhasil dibuat pada langkah 3
      On Error Resume Next
      If Not Intersect(Target, Range("E1")) Is Nothing Then
      Application.ScreenUpdating = False
          For Each a In Range("C4:C7")
              If a.Value = 0 Then
                  a.EntireRow.Hidden = True
                  Else
                  a.EntireRow.Hidden = False
              End If
          Next
      Application.ScreenUpdating = True
      End If
      Berikut cara kerjanyaKode diawali dengan perintah penanganan kesalahan (Error trap), Penanganan Kesalahan mengacu pada kode yang ditulis untuk menangani kesalahan yang terjadi saat aplikasi dijalankan. Kesalahan ini biasanya disebabkan oleh sesuatu di luar kendali, seperti file yang hilang, basis data tidak tersedia, data tidak valid, dll.
      Dengan menggunakan model penangan error On Error Resume Next, maka kesalahan (hasil error seperti #N/A) akan diabaikan dan tetap melanjutkan perintah yang ada, dengan bentuk pembacaan kode sebagai berikut :
      • Serangkaian kode akan dieksekusi jika terjadi perubahan pada sel E1 saja
      • Menyembunyikan proses update data agar tidak terjadi flicker saat berlangsungnya proses pembacaan kode
      • Menentukan rentang sel yang dijadikan acuan, yakni rentang sel C4 hingga sel C7
      • Selanjutnya adalah proses melihat isi data, jika ternyata isi atau nilainya adalah 0 maka baris akan disembunyikan dan sebaliknya
    6. Tutup jendela Microsoft Visual Basic editor dengan cara menekan tombol pintas Alt+Q untuk kembali ke halaman Microsoft Excel
    7. Uji serangkaian kode Macro VBA dengan cara merubah nilai yang terdapat di sel E1
    Hasil akhir bisa anda lihat dalam tampilan berikut
    memilih listbox dengan enter

    Selamat... anda sudah berhasil menyembunyikan baris dari setiap sel yang memuat angka 0 dari hasil formula VlookUp secara otomatis menggunakan Macro VBA.
    Terimakasih sudah berkunjung, semoga tutorial yang cukup singkat ini memberikan manfaat. Moitas grazas

    Tutorial ini memuat Macro VBA, jadi pastikan hasil akhir dari tutorial ini disimpan menggunakan format Excel Macro-Enable Workbook
    .xlsm
    atau Excel Binary Workbook
    .xlsb

  • Still haven't found what are you looking for

    We have provided a complete list of articles on this site to make it easier for you and giving the best solution for your excel issues

    VISIT LINK
    DMCA.com Protection Status

    excelive.com
    is a blogger resources site who provides best excel tutorial based on daily needs. The main mission of excelive is to share our little experience in excel to deliver best time killer for your excel issues.
    T.O.S
    Term of service

    Read More
    Download Area
    to complete all excel lessons, we have provided a download link for you Find Here
    Copyright © 2015 - excelive.com. Some rights reserved.
    equipped with by blogger