RANGE OBJECT merupakan representasi sel (atau sel) pada lembar kerja Anda. Pada sesi ini akan dipelajari cara memasukan data ke dalam sel atau range.
A. RANGE
Kita akan belajar memasukan data ke dalam worksheet melalui objek range. Mialkan kita akan memasukan data berupa angka 10 ke dalam range A1:A10. Buat activex control button, lalu masukan kode berikut:
Private Sub CommandButton1_Click()
Range("A1:A10").Value = 10
End Sub
OUTPUT:
B. CELLS
Kita akan belajar memasukan data ke dalam worksheet melalui objek CELLS. Tapi sebelumnya anda harus memahami Penulisan alamat sel nya sebagai berikut:
cells ( 1, 5)
1 menunjukan baris ke satu
5 menunjukan kolom ke lima yaitu kolom E
Misalkan kita akan memasukan data berupa angka 10 ke dalam sel A5. Buat activex control button, lalu masukan kode berikut:
Private Sub CommandButton1_Click()
Cells(5, 1).Value = 10
End Sub
OUTPUNYA:
C. SELECT
Metode penting dari objek Range adalah metode Select. Bahasa yang lebih mudah dipahami yaitu blok. Misalkan kita akan mem blok range B2:D4, Buat activex control button, lalu masukan kode berikut:
Private Sub CommandButton1_Click()
Range("B2:D4").Select
End Sub
OUTPUT:
D. Copy/Paste
Copy/Paste adalah istilah yang tidak asing buat pengguna komputer. Dengan VBA kita juga dapat melakukannya. Misalkan kita akan mengcopy data yang ada di range A1:A5 dan mem pastekannya di range D1:D5 , Buat activex control button, lalu masukan kode berikut:
Private Sub CommandButton1_Click()
Range("A1:A5").Select
Selection.Copy
Range("D1:D5").Select
ActiveSheet.Paste
End Sub
OUTPUT:
E. Clear
Clear digunakan untuk menghapus isi sel. Misalkan kita akan menghapus data yang ada di range A1:A5 , Buat activex control button, lalu masukan kode berikut:
Range("A1:A5").ClearContents
End Sub
Tidak ada komentar:
Posting Komentar