Assignment

Penugasan atau Assignment adalah proses menetapkan atau memberikan sebuah nilai pada suatu variabel atau objek.

Dalam VBA, kita dapat membuat variabel atau objek untuk menyimpan sebuah nilai atau sebuah data tertentu yang akan digunakan dalam program.

Contohnya, jika kita ingin menyimpan nilai suatu angka dalam program atau dalam memory, kita dapat membuat variabel seperti berikut:

Dim Nilai As Integer
Nilai = 5

Dalam contoh di atas, kita membuat variabel dengan yang diberi nama Nilai dengan tipe data Integer, (untuk tipe data bisa diabaikan dulu, ini akan kita pelajari pada materi selanjutnya) kemudian memberikan atau mengisi variable tersebut dengan nilai number 5.

Proses pengisian atau penugasan pada variabel tersebut dengan menggunakan operator penugasan yaitu =.

Jadi setiap akan melakukan assignment dalam VBA Formatnya seperti berikut:

YangAkan diisi = Diisi Oleh

Jadi posisinya dari kanan ke kiri, bukan dari kiri ke kanan seperti yang sudah dipelajari pada pelajaran matematika.

'Matematika
2 + 5 = 7

'VBA
7 = 2 + 5

Kita juga dapat menggunakan assignment untuk memberikan nilai pada sebuah objek seperti range atau Cells.

Contohnya, jika kita ingin menetapkan nilai pada sel A1 dalam lembar kerja Excel, kita dapat menggunakan kode berikut:

Sub MengisiA1()
Range("A1").Value = "Hello, world!"
End Sub

Pada script diatas, kita berhasil mengisi (Assignment ) range A1 dengan isi “hello, world”.

Baik object atau variable posisinya tetap sama, yang akan diisi berada di kiri sedangkan nilai yang akan masukan berada di paling kanan.

Contoh Kasus

Contoh Kasus 1

  • Buat sebuah script untuk mengisi Variable Nama dengan nama kamu kemudian tampilkan hasilnya di Msgbox

Jawaban :

Sub TampilNama()
Dim Nama As String
Nama = "Andi Setiadi"
Msgbox Nama
End Sub

Contoh Kasus 2

  • Buat sebuah script untuk mengisi Cell A1 dengan tulisan “Saya belajar VBA Excel”

Jawaban :

Sub MengisiA1()
Range("A1").value = "Saya belajar VBA Excel"
End Sub

Contoh Kasus 3

  • Buat sebuah script untuk mengisi Cell A1 dari Cell J10

Jawaban :

Sub MengisiA1()
Range("A1").value = Range("J10").value 
End Sub

List Tutorial
Apa yang sedang kamu cari?

Temukan beberapa kata kunci yang diinginkan.

Search