Lompat ke konten utama
←

Makro dan VBA Excel

Pelajaran 4 dari 14

Model objek Excel

Application, Workbook, Worksheet: objek, properti, metode

Setelah pelajaran ini kamu bisa menelusuri hierarki Application, Workbook, Worksheet, dan Range, membedakan properti dari metode, dan menentukan buku kerja serta lembar yang dituju sebuah baris kode.

  • ±13 menit
  • 3 latihan
  • Diperiksa 28 Okt 2026

Latihan di pelajaran ini butuh akun gratis. Progres, kode, dan catatanmu hanya tersimpan di browser ini. Masuk untuk menyimpannya

Materi

VBA mengendalikan Excel lewat objek yang tersusun bertingkat, disebut model objek. Puncaknya Application, yaitu Excel itu sendiri. Koleksi Workbooks berisi semua buku kerja yang terbuka; tiap Workbook punya koleksi Worksheets; tiap Worksheet punya sel berupa objek Range. Titik menyambung tingkat itu: Workbooks("Gaji.xlsm").Worksheets("Januari").Range("B2").

Satu objek diambil dari koleksinya dengan nama atau nomor urut. Worksheets("Januari") mencari lembar bernama Januari, sedangkan Worksheets(1) mengambil lembar paling kiri di bilah tab, termasuk lembar yang disembunyikan. Nomor urut berubah saat tab digeser; nama tidak.

Properti adalah sifat objek, dibaca dan diubah dengan tanda sama dengan, misalnya Range("B2").Value atau ws.Name. Metode adalah tindakan: ClearContents mengosongkan isi rentang dan Activate mengaktifkan lembar. Bila awal rantai dilewati, VBA memakai yang sedang aktif: Range("A1") di modul biasa berarti A1 di lembar aktif. ThisWorkbook menunjuk buku kerja tempat kode berada, sedangkan ActiveWorkbook menunjuk buku kerja di jendela paling depan; keduanya bisa berbeda setelah makro membuka berkas lain.

Sub TutupBuku()
    Dim ws As Worksheet
    Set ws = ThisWorkbook.Worksheets("Rekap")
    ws.Range("B1").Value = "Ditutup"      ' properti Value diubah
    ws.Range("C5:C20").ClearContents      ' metode dijalankan
    ws.Name = "Rekap Oktober"             ' properti Name diubah
End Sub

Latihan

0/3 lulus

Jawaban diperiksa di server. Lulus berarti kamu memahami contohnya, bukan penilaian seluruh pekerjaanmu.

Latihan 1 dari 3

Urutan tab buku kerja dari kiri: Ringkasan, Januari, Februari. Lembar Ringkasan disembunyikan, dan lembar Februari sedang aktif. Baris di bawah dijalankan. Di lembar mana teks Cek ditulis?

Worksheets(1).Range("A1").Value = "Cek"
Pilih satu jawaban

Latihan 2 dari 3

Bagaimana membaca baris terakhir kode di bawah?

Dim ws As Worksheet
Set ws = ThisWorkbook.Worksheets("Stok")
ws.Range("A2:A50").ClearContents
Pilih satu jawaban

Latihan 3 dari 3

Makro ini disimpan di rekap.xlsm dan dijalankan dari sana. Setelah baris Workbooks.Open, berkas cabang-bogor.xlsx terbuka di jendela paling depan dan menjadi buku kerja aktif. Di mana teks Sudah diambil ditulis?

Sub AmbilData()
    Workbooks.Open "D:\Laporan\cabang-bogor.xlsx"
    Range("A1").Value = "Sudah diambil"
End Sub
Pilih satu jawaban

Catatanmu

Memuat catatan…

tersimpan otomatis, ikut tercetak · 0/4.000

Lanjutkan ke