RANGE OBJECT

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:

Private Sub CommandButton1_Click()

Range("A1:A5").ClearContents

End Sub



Tidak ada komentar:

Posting Komentar