Kode VBA Excel Menarik yang Bisa Kamu Coba!

Sumber: Pixels

Bagi Sobat Digital yang ingin meningkatkan kemampuan Excel, VBA (Visual Basic for Applications) adalah bahasa pemrograman yang wajib dipelajari. Dengan VBA, kamu bisa mengotomatisasi berbagai tugas, membuat fungsi kustom, dan masih banyak lagi. Di postingan kali ini, Didik Digital akan membagikan beberapa kode VBA Excel menarik yang bisa langsung kamu coba. Yuk, kita simak!

Sebelum Mencoba:

• Pastikan tab Developer sudah aktif. Jika belum, klik File > Options > Customize Ribbon, lalu centang kotak Developer di panel sebelah kanan dan klik OK.
• Untuk membuka Visual Basic Editor (VBE), tekan Alt + F11.
• Di VBE, klik Insert > Module. Kamu akan menulis kode VBA di dalam modul ini.

1. Membuat Kotak Pesan Sederhana (Mudah)

Sub PesanSelamatDatang()
    MsgBox "Selamat datang di Didik Digital!"
End Sub

Penjelasan:

Kode ini akan menampilkan kotak pesan (message box) dengan tulisan "Selamat datang di Didik Digital!".

Cara Menjalankan:

1. Salin kode di atas ke dalam modul di VBE.
2. Letakkan kursor di mana saja di dalam kode Sub PesanSelamatDatang().
3. Tekan F5 atau klik tombol Run (ikon segitiga hijau) di VBE.

2. Mengubah Warna Sel Berdasarkan Nilai (Menengah)

Sub FormatNilai()
    Dim cell As Range
    For Each cell In Selection
        If IsNumeric(cell.Value) Then
            If cell.Value >= 80 Then
                cell.Interior.Color = vbGreen 'Hijau untuk nilai >= 80
            ElseIf cell.Value >= 60 Then
                cell.Interior.Color = vbYellow 'Kuning untuk nilai >= 60
            Else
                cell.Interior.Color = vbRed 'Merah untuk nilai < 60
            End If
        End If
    Next cell
End Sub

Penjelasan:

Kode ini akan mengubah warna latar belakang sel (cell background) berdasarkan nilainya. Sel dengan nilai >= 80 menjadi hijau, >= 60 menjadi kuning, dan < 60 menjadi merah.

Cara Menjalankan:

1. Masukkan beberapa angka di worksheet Excel.
2. Pilih (select) sel-sel yang ingin diformat.
3. Buka VBE, salin kode di atas ke dalam modul.
4. Jalankan kode dengan menekan F5 atau klik tombol Run.

3. Membuat Fungsi Kustom (Menengah)

Function TambahLima(angka As Integer) As Integer
    TambahLima = angka + 5
End Function

Penjelasan:

Kode ini membuat fungsi kustom bernama TambahLima yang akan menambahkan angka 5 ke angka yang dimasukkan.

Cara Menjalankan:

1. Salin kode di atas ke dalam modul di VBE.
2. Di sel Excel, ketik =TambahLima(10) (ganti 10 dengan angka lain), lalu tekan Enter. Hasilnya adalah 15.

4. Menyembunyikan Baris Berdasarkan Kondisi (Menengah-Lanjut)

Sub SembunyikanBaris()
    Dim i As Long
    For i = 2 To 10 'Ubah angka 10 sesuai baris terakhir data
        If Range("A" & i).Value < 60 Then 'Jika nilai di kolom A kurang dari 60
            Rows(i).EntireRow.Hidden = True
        End If
    Next i
End Sub

Penjelasan:

Kode ini menyembunyikan baris yang nilai pada kolom A nya kurang dari 60. Ubah angka 2 dan `10` sesuai baris data kamu.

Cara Menjalankan:

1. Isi data pada kolom A sheet excel.
2. Buka VBE, salin kode di atas ke dalam modul.
3. Jalankan kode dengan menekan F5 atau klik tombol Run.

5. Membuat UserForm Sederhana (Lanjutan)

Tambahkan TextBox dan CommandButton di UserForm

'Kode di Module
Sub TampilkanForm()
    UserForm1.Show
End Sub

'Kode di UserForm1 (tambahkan TextBox1 dan CommandButton1 di UserForm)
Private Sub CommandButton1_Click()
    MsgBox "Halo, " & TextBox1.Value & "!"
End Sub

Penjelasan:

Kode ini akan menampilkan UserForm sederhana dengan satu kotak teks dan satu tombol. Saat tombol diklik, akan muncul kotak pesan yang menyapa nama yang dimasukkan di kotak teks.

Cara Menjalankan:

1. Di VBE, klik Insert > UserForm.
2. Tambahkan kontrol TextBox dan CommandButton ke dalam UserForm tersebut.
3. Klik dua kali pada CommandButton untuk membuka jendela kode, lalu masukkan kode Private Sub CommandButton1_Click()... di atas.
4. Kembali ke jendela Module, masukkan kode Sub TampilkanForm()....
5. Jalankan kode TampilkanForm dengan menekan F5 atau klik tombol Run.

Penutup

Itulah beberapa contoh kode VBA Excel yang menarik dan bisa kamu coba. Jangan takut untuk bereksperimen dan memodifikasi kodenya sesuai dengan kebutuhanmu. Dengan terus belajar dan berlatih, kamu pasti bisa menguasai VBA dan membuat pekerjaanmu di Excel menjadi lebih mudah dan efisien. Selamat mencoba!

Punya pertanyaan atau ingin *request* kode VBA lainnya? Tulis di kolom komentar, ya! Dan jangan lupa *subscribe* channel YouTube Didik Digital untuk tutorial Excel dan VBA lainnya!