Salin Tempel di VBA mirip dengan apa yang kami lakukan di lembar kerja excel, seperti kami dapat menyalin nilai dan menempelkannya ke sel lain juga kami dapat menggunakan tempel khusus untuk hanya menempelkan nilai, demikian pula di VBA kami menggunakan metode salin dengan properti rentang untuk salin nilai dari satu sel ke sel lainnya dan untuk menempelkan nilai, kami menggunakan metode tempel khusus atau tempel fungsi lembar kerja.
Bagaimana cara menyalin tempel di VBA?
Di bawah ini adalah beberapa contoh cara copy-paste di excel menggunakan VBA.
Hal dasar yang kami lakukan di excel adalah kami menyalin, kami memotong, dan menempelkan data dari satu sel ke sel lain. Itu juga tidak membutuhkan pengenalan khusus. Namun, mempelajari pengkodean VBA penting untuk memahami konsep yang sama dalam bahasa pengkodean. Copy Paste di VBA adalah tugas rutin yang kami lakukan setiap hari di excel. Untuk menyalin terlebih dahulu, kita perlu memutuskan sel mana yang akan disalin.
Contoh # 1 - Salin dan Tempel Nilai Menggunakan Objek Rentang
Asumsikan Anda memiliki kata "Excel VBA" di sel A1.
Katakanlah, misalnya, jika Anda ingin menyalin sel A1, kita dapat menggunakan objek VBA RANGE.
Kode:
Sub Copy_Example () Range ("A1"). Akhiri Sub
Saat Anda mereferensikan sel, kita dapat melihat semua properti dan metode dengannya. Jadi pilih metode " Salin".
Kode:
Sub Copy_Example () Range ("A1") Salin End Sub
Setelah memilih metode, tekan tombol spasi untuk melihat argumen metode Salin.
Tercantum Tujuan.
Ini bukan apa-apa, tetapi di mana Anda ingin menyalin-tempel nilai di VBA tanpa memilih metode PASTE.
Jika kita menempel di lembar yang sama, kita dapat memilih sel dengan menggunakan objek Range. Katakanlah jika kita ingin menempelkan nilai di sel B3, kita dapat menempatkan tujuan sebagai "Range (" B3 ")."
Kode:
Sub Copy_Example () Range ("A1") Salin Tujuan: = Range ("B3") End Sub
Ini akan menyalin data dari sel A1 dan menempel di sel B3.
Kami juga dapat menggunakan metode di bawah ini untuk menempelkan data.
Kode:
Sub Copy_Example () Range ("A1"). Copy Range ("B3"). Pilih ActiveSheet. Tempel Akhir Sub
Pertama, kami akan menyalin & memilih data dari sel A1 dan menempel di sel B3.
Contoh # 2 - Salin ke Lembar Kerja lain di Buku Kerja yang Sama
Sekarang, jika kita ingin menyalin-tempel nilai dari lembar kerja yang berbeda menggunakan makro VBA, maka dalam argumen Tujuan, kita perlu mereferensikan nama lembar dengan menggunakan objek LEMBAR KERJA lalu sebutkan rentang sel di LEMBAR KERJA tersebut. Kode di bawah ini akan melakukan pekerjaan itu.
Kode:
Sub Copy_Example () Range ("A1") Salin Tujuan: = Lembar Kerja ("Sheet2"). Range ("B3") End Sub
Jika kita ingin menyalin data dari sheet tertentu dan ingin menempelkannya di sheet tertentu lainnya, kita perlu menyebutkan kedua nama sheet tersebut.
Pertama kita perlu menyebutkan lembar penyalinan.
Lembar kerja ("Sheet1"). Range ("A1"). Salin
Kemudian dalam argumen Tujuan, kita perlu menyebutkan nama lembar kerja yang ditargetkan dan rentang sel.
Tujuan: = Lembar Kerja ("Sheet2"). Range ("B3")
Jadi kodenya harus seperti ini.
Kode:
Sub Copy_Example () Lembar Kerja ("Sheet1"). Range ("A1") Salin Tujuan: = Lembar Kerja ("Sheet2"). Range ("B3") End Sub
Contoh # 3 - Salin dari Satu Buku Kerja ke Buku Kerja lain
Kami telah melihat cara menyalin dari lembar kerja ke lembar kerja lain di buku kerja yang sama. Tapi kita juga bisa melakukan ini dari satu buku kerja ke buku kerja lainnya.
Lihatlah kode di bawah ini.
Kode:
SubCopy_Example () Workbooks ("Book 1.xlsx"). Worksheets ("Sheet1"). Range ("A1"). Salin Buku Kerja ("Book 2.xlsx"). Aktifkan ActiveWorkbook.Worksheets ("Sheet 2"). Pilih ActiveSheet.Paste End Sub
Pertama itu akan menyalin data dari lembar kerja "Sheet1" di buku kerja "Book1.xlsx" dari sel A1.
“Workbooks("Book 1.xlsx").Worksheets("Sheet1").Range("A1").Copy”
Then it will activate the workbook “Book 2.xlsx”.
Workbooks("Book 2.xlsx").Activate
In the active workbook, it will select the worksheet “Sheet 2.”
ActiveWorkbook.Worksheets("Sheet 2").Select
Now in the active sheet, it will paste.
ActiveSheet.Paste
Alternative Way for using Copy-Paste in VBA
We have one more alternative way of having the data from one cell to another cell. Assume you have the word “Excel VBA” in the cell A1 and you need the same to come in cell B3.
One method we have seen is using the VBA copy and paste method. Now I will show you one of the alternative ways. Look at the below piece of code to understand.
Code:
Sub Copy_Example1() Range("A1").Value = Range("B3").Value End Sub
The above says whatever the value is there in the cell A1 should be equal to the value in the cell B3.
Range("A1").Value = Range("B3").Value
Even though this is not a copy and paste method still adds more value to our coding knowledge.
Top Ways of VBA Copy and Paste as Values
Now we will see different ways of VBA copy and paste values. Assume you are in the cell A1 as shown in the below image.
- If we want to copy and paste, we need to reference the cell here. Rather we can just use a property of Selection. Copy method.
Code:
Sub Copy_Example1() Selection.Copy Destination:=Range("B3") End Sub
OR
Sub Copy_Example1() ActiveCell.Copy Destination:=Range("B3") End Sub
- If you want to copy the entire used range of the worksheet, you can use the below code.
Code:
Sub Copy_Example2 () Lembar Kerja ("Sheet1"). UsedRange.Copy Destination: = Worksheets ("Sheet2"). Range ("A1") End Sub
Ini akan menyalin seluruh rentang yang digunakan di lembar kerja "Sheet1" dan akan menempelkannya di lembar kerja "Sheet2".
