Cara Mengcopy Data Otomatis Menggunakan VBA Macro Excel

  September 15, 2015      Edit
Mengcopy data secara otomatis akan memudahkan anda, ketimbang harus menekan tombol ctrl + c secara terus-terusan setiap ingin menyalin data. Dengan memanfaatkan fitur Ms. Excel, VBA Macro, anda dapat mempermudah pekerjaan tersebut. Dengan hanya membuat satu macro berisikan perintah-perintah tertentu, anda dapat membuat sebuah program pengcopy otomatis.

Seorang netizen bernama Yohanes, mengeluhkan masalah program excel-nya bahwa dia ingin menyalin data secara otomatis menggunakan macro excel. Kemudian saya berinisiatif untuk membuat postingan ini untuk membantu beliau memecahkan masalahnya. Program berikut adalah tentang bagaimana cara menyalin data secara otomatis menggunakan VBA Macro Excel.

Langkah #1: Aktifkan Tab Developer

Jika anda masih baru dalam menggunakan macro, dan tidak tahu cara mengaktifkan menu developer pada excel, silakan lihat postingan ini:

Langkah #2: Membuat Data

Anda dapat membuat rumpunan data yang dibuat seperti tabel. Untuk lebih jelasnya, anda bisa meniru contoh data milik Mas Yohanes dibawah ini:

Anda dapat meletakannya pada Sheet1:
Tabel Microsoft Excel
Sheet 1
Ini adalah hasil salinan yang dapat anda letakkan pada Sheet2:
Tabel Microsoft Excel
Sheet 2

Langkah #3: Membuka Code Editor

Untuk membuka code editor pada excel, silakan buka menu developer anda, kemudian pilih view code. Jika kode editor sudah muncul, silakan membuat module baru kemudian tambahkan kode berikut didalamnya:
Sub Copy()
' Copy Macro
    Sheets(1).Select
    Range("A2").Offset(1, 0).Select
    Range(Selection, Selection.End(xlToRight)).Select
    Range(Selection, Selection.End(xlDown)).Select
    Selection.Copy
    Sheets(2).Select
    If Range("A1").Offset(1, 0).Value = "" Then
        Range("A1").Offset(1, 0).Select
    Else
        Range("A1").End(xlDown).Offset(1, 0).Select
    End If
        ActiveSheet.Paste
    Sheets(1).Select
    Range("A1048576").ClearContents
    MsgBox "Penyalinan berhasil!", vbInformation, "Informasi"
End Sub 

Langkah #4: Membuat tombol

Untuk membuat tombol, anda bisa memanfaatkan shapes (Insert > Shapes) yang kemudian disulap menjadi sebuah tombol, lengkap dengan caption-nya. Setelah itu klik kanan pada tombol tersebut, dan klik Assign Macro. Di dalam daftar macro, pilih macro bernama Copy, kemudian klik OK.

Hasil akhirnya adalah sebagai berikut:
cara menyalin data secara otomatis dengan VBA Excel
Hasil akhir
Selesai. Silakan anda coba dan lihat hasilnya. Jika terdapat kesalahan atau anda mengharapkan improvisasi terhadap program diatas, silakan sampaikan lewat kolom komentar, dan saya akan berusaha memperbaikinya.

Apabila anda memiliki masalah berkenaan dengan program excel anda, jangan sungkan untuk mengemail saya di arubiandesu@gmail.com dan akan saya buatkan tutorial-nya secara cuma-cuma.

File asli milik: Yohanes Sefrianto Laga Keraf
Dimodifikasi oleh Alvian Casablancas

Download file lengkapnya (16kb)