Pernyataan Set VBA Excel
VBA Set adalah pernyataan yang digunakan untuk menetapkan kunci nilai apa pun yang mengatakan objek atau referensi ke variabel, kami menggunakan fungsi ini untuk menentukan parameter untuk variabel tertentu, misalnya, jika kami menulis Set M = A yang berarti sekarang M referensi memiliki nilai dan atribut yang sama dengan yang dimiliki A.
Di VBA, objek adalah inti dari keunggulan karena tanpa objek, kita tidak dapat melakukan apa pun. Objeknya adalah Buku Kerja, Lembar Kerja, dan Rentang. Saat kita mendeklarasikan variabel, kita perlu menetapkan tipe data padanya, dan kita juga bisa menetapkan objek sebagai tipe data. Untuk menetapkan nilai ke variabel objek yang dideklarasikan, kita perlu menggunakan kata "SET". Kata "Set" digunakan untuk merujuk ke objek baru di VBA, misalnya, mengacu pada rentang tertentu dari lembar kerja tertentu.
Bagaimana cara menggunakan Pernyataan Set VBA Excel?
# 1 - Tetapkan Pernyataan dengan Variabel Objek Rentang
Misalnya, anggap Anda ingin menggunakan rentang A1 hingga D5 cukup sering. Daripada menulis kode sebagai Range ("A1: D5") setiap saat, kita dapat mendeklarasikan variabel sebagai range dan menetapkan referensi range sebagai Range ("A1: D5")
Langkah 1: Deklarasikan variabel sebagai objek Range.
Kode:
Sub Set_Example ()
Redupkan MyRange As Range
Akhiri Sub
Langkah 2: Saat kami menetapkan jenis data sebagai rentang, gunakan kata "Set".
Kode:
Sub Set_Example () Redupkan MyRange Sebagai Rentang Set MyRange = End Sub
Langkah 3: Sekarang sebutkan kisarannya.
Kode:
Sub Set_Example () Redupkan MyRange As Range Set MyRange = Range ("A1: D5") End Sub
Langkah 4: Sekarang, variabel "MyRange" sama dengan rentang A1 hingga D5. Dengan menggunakan variabel ini, kita dapat mengakses semua properti dan metode dari kisaran ini.
Kita dapat menyalin, menambahkan komentar di excel, dan melakukan banyak hal lainnya.
Misalnya, tujuan, saya telah membuat beberapa angka di sini.
Sekarang menggunakan variabel, saya akan mengubah ukuran font menjadi 12.
Kode:
Sub Set_Example () Redupkan MyRange As Range Set MyRange = Range ("A1: D5") MyRange.Font.Size = 12 End Sub
Ini akan mengubah ukuran font dari rentang yang ditetapkan.
Seperti ini, kita dapat melakukan banyak hal dengan rentang tertentu dengan menggunakan kata "Set".
# 2 - Atur Pernyataan dengan Variabel Objek Lembar Kerja
Kami telah melihat bagaimana "set" bekerja dengan objek jangkauan di VBA. Ia bekerja persis sama dengan objek lembar kerja juga.
Katakanlah Anda memiliki 5 lembar kerja di buku kerja Anda, dan Anda ingin terus kembali ke satu lembar kerja tertentu. Anda dapat mengatur nama lembar kerja itu ke variabel objek yang ditentukan.
Misalnya, lihat kode di bawah ini.
Kode:
Sub Set_Worksheet_Example () Dim Ws As Worksheet Set Ws = Worksheets ("Summary Sheet") End Sub
Dalam kode di atas, variabel "Ws" didefinisikan sebagai variabel objek, dan di baris berikutnya, dengan menggunakan kata "Set," kami menetapkan variabel ke lembar kerja bernama "Lembar Ringkasan".
Sekarang dengan menggunakan variabel ini, kita dapat melakukan semua hal yang berhubungan dengannya. Lihatlah dua set kode di bawah ini.
# 1 - Tanpa Kata "Set"
Kode:
Sub Set_Worksheet_Example1 () 'Untuk memilih lembar Lembar Kerja ("Lembar Ringkasan"). Pilih' Untuk Mengaktifkan lembar Lembar Kerja ("Lembar Ringkasan"). Aktifkan 'Untuk menyembunyikan lembar Lembar Kerja ("Lembar Ringkasan"). Visible = xlVeryHidden' To perlihatkan lembar Lembar Kerja ("Lembar Ringkasan") Visible = xlVisible End Sub
Setiap kali saya menggunakan objek lembar kerja untuk merujuk ke lembar "Lembar Ringkasan", ini membuat kode menjadi sangat panjang dan membutuhkan banyak waktu untuk mengetik.
Sebagai bagian dari kode yang sangat besar, sangat frustasi untuk mengetik nama lembar kerja seperti ini setiap kali Anda perlu mereferensikan lembar kerja.
Sekarang lihatlah keuntungan menggunakan kata Set in Code.
# 2 - Dengan "Set" Word
Kode:
Sub Set_Worksheet_Example() Dim Ws As Worksheet Set Ws = Worksheets("Summary Sheet") 'To select the sheet Ws.Select 'To Activate the sheet Ws.Activate 'To hide the sheet Ws.Visible = xlVeryHidden 'To unhide the sheet Ws.Visible = xlVisible End Sub
The moment we set the worksheet name, we can see the variable name while entering the code as part of the list.
#3 - Set Statement with Workbook Object Variables
The real advantage of the word “Set” in VBA arises when we need to reference different workbooks.
When we work with different workbooks, it is so hard to type in the full name of the workbook, along with its file extension.
Assume you have two different workbooks named “Sales Summary File 2018.xlsx” and “Sales Summary File 2019.xlsx” we can set the two workbooks like the below code.
Code:
Sub Set_Workbook_Example1 () Redup Wb1 Sebagai Workbook Redup Wb2 As Workbook Set Wb1 = Buku Kerja ("Sales Summary File 2018.xlsx") Set Wb2 = Workbooks ("Sales Summary File 2019.xlsx") End Sub
Sekarang variabel Wb1 sama dengan buku kerja bernama "File Ringkasan Penjualan 2018.xlsx," dan variabel Wb2 sama dengan buku kerja bernama "File Ringkasan Penjualan 2019.xlsx".
Dengan menggunakan variabel ini, kita sebenarnya dapat mengakses semua properti dan metode yang terkait dengan buku kerja.
Kita bisa mempersingkat kode seperti di bawah ini.
Tanpa Menggunakan Set Kata Kunci untuk mengaktifkan buku kerja:
Buku Kerja ("File Ringkasan Penjualan 2018.xlsx"). Aktifkan
Menggunakan Set Kata Kunci untuk mengaktifkan buku kerja:
Wb1. Aktifkan
Hal ini membuat penulisan lot kode lebih sederhana, dan juga, setelah nama buku kerja ditetapkan, ada kekhawatiran kesalahan ketik nama buku kerja.
