Dasar-Dasar Copy Paste Range dengan Coding VBA

Ingin belajar VBA? berikut saya uraikan materi bagaimana coding atau VBA cara copy range atau cell tersebut ke range yang lain. Misalkan saya mempunyai data dari range A1 sampai dengan B10 (A1:B10) seperti berikut ini

Data tersebut akan dopy dan dipastekan ke alamat cell tersebut dengan menggunakan copy paste VBA. Caranya adalah silakan buat 1 buah module CopydanPaste berikut ini

Sub CopydanPaste()
Range("A1:B10").Copy Destination:=Range("E1")
End Sub

Arti dari coding VBA tersebut adalah kita akan menempatkan data dimulai dari cell E1 dan data tersebut sama persis dengan range A1:B10.

Cara lain untuk coding copy paste adalah Anda dapat membuat modul lain seperti berikut ini

Sub CopyPasteCaraLain()
Range("A1:B10").Copy
Range("E1").Select
ActiveSheet.Paste
End Sub

Hasil coding kedua script VBA tersebut akan menghasilkan perintah yang sama namun untuk copy dan paste coding yang kedua akan meninggalkan marque atau garis putus-putus yang bergerak pada range A1:B10 dan untuk mengatasi hal tersebut Anda harus menambahkan script berikut ini dibawah ActiveSheet.Paste

Application.CutCopyMode = False

Hasil akhir script tersebut seperti berikut

Sub CopyPasteCaraLain()
Range("A1:B10").Copy
Range("E1").Select
ActiveSheet.Paste
Application.CutCopyMode = False
End Sub

Hasilnya akan sama dengan script yang pertama. Silakan gunakan yang mana saja dan menurut saya akan lebih simple yang pertama tetapi jika menurut Anda lebih mudah yang kedua silakan gunakan toh hasilnya juga tidak akan  beda.

Demikian tutorial dasar bagaimana copy dan paste dengan coding VBA semoga bermanfaat. dan selamat mencoba.

Tweet