FUNGSI COPY-PASTE DENGAN BUTTON DI EXCEL

Salam hangat bagi Anda-Anda yang familiar dengan source VBA di Excel... tentunya dalam hal ini kalian yang sering menggunakan Microsoft Excel apa yang namanya copy-paste memang sudah dan sering digunakan dalam memanipulasi dan mengolah data sedemikian rupa tapi dengan menggunakan Menu Bar yang tersedia.. Nah... bila kita mengetahui lebih detail lagi dalam hal pemrograman khususnya VBA di Microsoft Excel kita bisa membuatnya sendiri melalui Button khusus yang telah tersedia dalam sejumlah control di Excel...
Dalam Praktek kali ini saya mencobanya dengan menggunakan Microsoft Excel 2010 :

~~~Langkah Pertama
- Buka Microsoft Excel 2010

~~~Langkah Kedua (Memunculkan Ikon Insert Controls)
Kita akan memunculkan ikon Insert Controls di Menu Bar agar kita mudah dalam membuat Button, yaitu :
- Klik lambang panah kebawah pada Titel Bar Excel (Customize Quick Acces Toolbar), lalu kemudian muncul menu DropDown
- Klik More Commands.. dan kemudian muncul Jendela Excel Options
- Pada kotak Choose Command from Pilih Developer Tab
- Pada kotak Separator Klik Lambang Insert Controls
- Kemudian Klik Tobol Add >>, kemudian Ikon tersebut akan berpindah kotak sebelah kanan, dan artinya ikon tersebut siap dimunculkan pada title Bar
- kemudian klik Ok

~~~Langkah Ketiga (Membuat Button)
- Klik pada ikon insert control kemudia akan akan muncul menu dropdown

- Kemudian Pilih ikon Button (form control)
dan bawa kursor ke lembaran kerja klik jangan lepas sambil menarik sejauh mana ukuran button yg di inginkan dan setelah pas, dilepaskan kemudian akan mucul kotak dialog Assign Macro, dalam kotak macro name telah tertulis defaultnya Button1_Click biarkan aja
- Kemudian Klik Tombol New

~~~~ Langkah Keempat (Membuat Kode Porgram)
Setelah itu kita akan dibawa ke layar Editor Visual Basic
disini kita akan membuat contoh perintah program pada saat button diklik maka Range A1 : A10 akan diseleksi dan di Copy
Scirpnya yaitu :

Sub Button1_Click()
Range("A1:A2").Select
Range("A1:A2").Copy
End Sub

Setelah itu tutup Jendela Visual Basic Editor
dan sekarang kita akan merubah Nama Button yang telah kita buat yang sebelumnya tertulis Button1 menjadi Copy, caranya :
- Klik kanan pada Button
- kemudian pilih Edit Text
- Setelah itu ketik Copy 

Oke...
Naah.. Sekarang Ulangi Langkah Ketiga Buat Button Baru Satu Lagi Sebagai Button Pastenya..
Pada langkah keempat buat kode programnya :

Sub Button2_Click()
Range("B1:B10").PasteSpecial (xlPasteAll)
End Sub

Dan ubah lagi nama buttonnya menjadi nama PASTE
Kira-kira bentuknya seperti gambar dibawah ini :

Naah setelah itu...
Silahkan kalian masukkan huruf ato pun anggkan dalam range A1 sampai A10 terserah, kalo saya memasukkannya Huruf, Kemudian Klik Buton Copy dan setelah itu Paste
Hasilnya akan terlihat di Range B1:B10...

Yaaahhhcc itulah sepintas dan selayang pandang dari aku.. ini cuma perintah paling dasar sekali... kalo mau lebih tinggi harus kuliah lagi.. sebab yang nulispun belum begitu tau seluk beluk selanjutnya itu gimana... hahahahaiii :)