Bagaimana cara menggunakan sel sebagai variabel di vba?

Untuk menggunakan rentang atau sel tunggal sebagai variabel, Anda harus mendeklarasikan variabel tersebut terlebih dahulu dengan tipe data rentang. Setelah Anda selesai melakukannya, Anda perlu menentukan rentang dari satu sel ke variabel ini menggunakan objek rentang. Ini juga memberi Anda akses ke semua properti dan metode yang dapat Anda gunakan dengan suatu rentang.

1. Gunakan kata kunci “Redupkan” dan masukkan nama variabel.
2. Deklarasikan kata kunci sebagai Range .
3. Ketikkan nama variabel.
4. Tentukan rentang yang ingin Anda tetapkan ke variabel.

Tetapkan pilihan ke variabel rentang

Anda juga dapat menggunakan rentang yang dipilih untuk suatu variabel dan kemudian menggunakan variabel tersebut untuk mengakses properti dan metode. Perhatikan kode berikut.

 Sub vba_range_variable() Dim rng As Range Set rng = Selection Selection.Clear End Sub

Namun ada satu hal yang perlu Anda waspadai, yaitu ketika Anda memilih objek selain rentang, VBA akan menampilkan kesalahan.

Namun ini juga merupakan metode dinamis di mana Anda tidak perlu mengubah rentangnya lagi dan lagi.

Salin rentang menggunakan variabel

Setelah Anda mendeklarasikan variabel sebagai rentang, Anda juga dapat menyalin rentang tersebut menggunakan nama variabel tersebut. Misalkan Anda telah mendeklarasikan rentang A1:A10 sebagai variabel rng (contoh di atas), Anda dapat menyalinnya menggunakan kode berikut.

 Sub vba_range_variable() Dim rng As Range Set rng = Range("A1:A10") rng.Copy End Sub

Menggunakan variabel rentang dalam suatu fungsi

Anda juga bisa menggunakan variabel rentang untuk merujuk ke rentang dalam suatu fungsi saat menulis makro. Perhatikan kode berikut.

 Sub vba_range_variable() Dim iNames As Variant Dim rng As Range Set rng = Range("A1:A10") Range("B1") = WorksheetFunction.Max(rng) End Sub

Dibutuhkan nilai dalam rentang A1:A10 dan karena Anda perlu menggunakan variabel “rng”, kami menggunakan variabel dalam nilai maksimum untuk mengeluarkannya.

Terkait: Cara Menggunakan Fungsi Lembar Kerja di VBA

Hitung jumlah baris dan kolom

Seperti yang saya katakan sebelumnya, setelah Anda menentukan variabel sebagai rentang, Anda juga akan mendapatkan semua properti dan metode akses. Bayangkan jika Anda ingin menghitung baris dan kolom. Berikut kode yang bisa digunakan.

 Sub vba_range_variable() Dim rng As Range Set rng = Range("A1:A10") MsgBox "This range has " & _ rng.Rows.Count & " row(s) and " & _ rng.Columns.Count & " coulmn(s)." End Sub

Saat Anda menjalankan kode ini, ini akan menampilkan pesan dengan jumlah baris dan kolom dalam rentang yang Anda tentukan dalam variabel.

Definisi lembar kerja dengan jangkauan

Dalam semua contoh di atas, kami menggunakan rentang tanpa menyebutkan lembar kerja, jadi ketika Anda menjalankan kode ini, VBA akan selalu mengacu pada rentang di lembar aktif. Namun jika Anda ingin merujuk ke lembar kerja tertentu, Anda perlu menggunakan objek lembar kerja dengan rentangnya.

 Dim rng As Range Set rng = Worksheets("Sheet1").Range("A1:A10")